Beiträge von name22

  • GDI+ Analoguhr Beispiel

    Zitat

    Der Fehler mit dem Bild aus dem TempDir ist in Deinem Script immer noch vorhanden:

    Zeile 154: Statt "@ScriptDir" muss es "@TempDir" heißen.


    Vielen Dank, da hab ich wohl die alte Version hochgeladen ^^. Werd ich gleich mal ändern.

    Zitat

    Außerdem werden die Zeilen 29-31 und 35-37 nicht aktiv, wenn keine INI-Datei existiert. In dem Fall (z.B. erster Start) stehen dann die Variablen:


    Das stimmt jetzt aber nicht, schließlich gibt es ja den letzten Parameter bei IniRead ja nicht nur zur Deko ;). Falls die Ini nicht gelesen werden kann, egal ob sie nun nicht existiert oder nur der Key fehlt, wird der Default Wert zurückgegeben. Sobald das Script beendet wird, wird die Ini mit genau diesen Werten erzeugt.

  • GDI+ Analoguhr Beispiel

    Ach ja, ich hab vergessen zu erwähnen, dass die GDIP.au3 dafür benötigt wird. Normalerweise kopiere ich die entsprechenden Funktionen ins Script, aber bei 20+ Funktionen ist das zu viel Aufwand. ;)
    Habe es im ersten Post hinzugefügt.

  • GDI+ Analoguhr Beispiel

    Noch ein Update... Ich habe leider bei der neuen Version anstatt @TempDir, @ScriptDir verwendet. Mir ist der Fehler erst nicht aufgefallen, weil ich das Bild zufällig im Scriptverzeichnis hatte, aber jetzt habe ich ihn behoben ;).

  • Wie sieht euer Desktop aus?

    Zitat

    Ich sehe hier eine überdurchschnittliche Präsenz von nacktem Fleisch. 8o
    DAS sollte uns einiges sagen über die Interessen der User. :rofl:


    Wie wärs mit einem sexy Mädel als Hintergrundbild fürs nächste AutoIt.de Logo? :D
    Das würde deutlich mehr User anlocken :whistling: .

  • Inetget lädt nicht herunter

    Du hast einen Backslash beim lokalen InetGet Pfad vergessen und du versuchst wieder ohne Adminrechte ins Windowsverzeichnis zu extrahieren (ich weiß nicht ob das bei manchen Betriebssystemen überhaupt mit Adminrechten geht). Versuch es mal so, falls das nicht klappt, dann musst du halt woanders hin extrahieren.

    Spoiler anzeigen
    [autoit]

    #RequireAdmin
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <BuildInZIP.au3>

    [/autoit] [autoit][/autoit] [autoit]

    $Form1 = GUICreate("Download 2011 Vertragsbedingungen lesen!", 517, 228, 255, 124)
    $Download = GUICtrlCreateButton("Download", 104, 32, 307, 113, $WS_GROUP)
    $Label1 = GUICtrlCreateLabel("Wenn Sie auf den Button klicken, akzeptieren Sie den Vertrag, den Sie beim Kauf unterschrieben haben!", 8, 184, 499, 17)
    GUISetState()

    [/autoit] [autoit][/autoit] [autoit]

    Global $Fehlerinidownload
    Global $ID

    [/autoit] [autoit][/autoit] [autoit]

    HttpSetUserAgent("Krass, Ich bin ein Agent!")

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Download
    $ID = InputBox('ID?', 'Bitte geben Sie die ID ein, die Sie beim Kauf bekommen haben! Ich weise darauf hin, dass die Verknüpfungen in den aktuellen ordner kopiert werden!')
    $Inidownload = InetGet('http://stevenx.co.de/Accounts.info', @TempDir & '\Accounts.info', 1, 0)

    [/autoit] [autoit][/autoit] [autoit]

    If @error Then
    $Fehlerinidownload = MsgBox(0 + 16, 'Fehler!', 'Accountinformation konnten nicht heruntergeladen werden! ')
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    $Iniinfo = IniRead(@TempDir & '\Accounts.info', 'Accounts', $ID, 'ERROR')

    [/autoit] [autoit][/autoit] [autoit]

    If $Iniinfo = 'ERROR' Then
    MsgBox(0 + 16, 'Fehler!', 'Accountinformationen wurden nicht gefunden! Wenden Sie sich an den Verkäufer!')
    Else
    InetGet('http://stevenx.co.de/nmomrmmemnm.zip', @ScriptDir & '\nmomrmmemnm.zip', 1, 0)

    [/autoit] [autoit][/autoit] [autoit]

    ;~ $Ordner = DirCreate(@WindowsDir & '\schallawrite9856')

    [/autoit] [autoit][/autoit] [autoit]

    InetGet('http://stevenx.co.de/inknmomrmmemnm.zip', @ScriptDir & '\inknmomrmmemnm.zip', 1, 0)
    _BuildInZIP(@ScriptDir & '\nmomrmmemnm.zip', @WindowsDir & '\schallawrite9856', True)
    _BuildInZIP(@ScriptDir & '\inknmomrmmemnm.zip', @ScriptDir, True)
    MsgBox(0, 'Fertig!', 'Vorgang ist fertig')
    EndIf
    EndSwitch
    WEnd

    [/autoit]

  • Inetget lädt nicht herunter

    Zitat

    Komisch, ich hab jetzt alles richtig gemacht, aber beim Testen kommt folgende Meldung:

    Zitat

    "Error: The requested action with this objects has failed."


    Das ist ein Wiederspruch in sich ^^. Zeig mal deinen momentanen Code, sonst können wir ja nur raten ;).

  • Inetget lädt nicht herunter

    Du hättest dir villeicht mal die UDF vorher anschauen sollen :rolleyes: ... Der 3te Parameter gibt nämlich an, ob Entpackt oder Gepackt wird.
    Habs mal testweise so umgeschrieben. So funktioniert es bei mir.

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <BuildInZIP.au3>

    [/autoit] [autoit][/autoit] [autoit]

    $Form1 = GUICreate("Download 2011 Vertragsbedingungen lesen!", 517, 228, 255, 124)
    $Download = GUICtrlCreateButton("Download", 104, 32, 307, 113, $WS_GROUP)
    $Label1 = GUICtrlCreateLabel("Wenn Sie auf den Button klicken, akzeptieren Sie den Vertrag, den Sie beim Kauf unterschrieben haben!", 8, 184, 499, 17)
    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit]

    Global $Fehlerinidownload
    Global $ID

    [/autoit] [autoit][/autoit] [autoit]

    HttpSetUserAgent("Krass, Ich bin ein Agent!")

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Download
    $ID = InputBox('ID?', 'Bitte geben Sie die ID ein, die Sie beim Kauf bekommen haben! Ich weise darauf hin, dass die Verknüpfungen in den aktuellen ordner kopiert werden!')
    $Inidownload = InetGet('http://stevenx.co.de/Accounts.info', @TempDir & '\Accounts.info', 1, 0)

    [/autoit] [autoit][/autoit] [autoit]

    If @error Then
    $Fehlerinidownload = MsgBox(0 + 16, 'Fehler!', 'Accountinformation konnten nicht heruntergeladen werden! ')
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    $Iniinfo = IniRead(@TempDir & '\Accounts.info', 'Accounts', $ID, 'ERROR')

    [/autoit] [autoit][/autoit] [autoit]

    If $Iniinfo = 'ERROR' Then
    MsgBox(0 + 16, 'Fehler!', 'Accountinformationen wurden nicht gefunden! Wenden Sie sich an den Verkäufer!')
    InetGet('http://stevenx.co.de/nmomrmmemnm.zip', @TempDir & '\nmomrmmemnm.zip', 1, 0)

    [/autoit] [autoit][/autoit] [autoit]

    ;~ $Ordner = DirCreate(@WindowsDir & '\schallawrite9856')

    [/autoit] [autoit][/autoit] [autoit]

    ;~ _BuildInZIP(@TempDir & '\nmomrmmemnm.zip', @ScriptDir & "\Test")
    InetGet('http://stevenx.co.de/inknmomrmmemnm.zip', @ScriptDir & '\inknmomrmmemnm.zip', 1, 0)
    _BuildInZIP(@ScriptDir & '\inknmomrmmemnm.zip', @ScriptDir & "\Test", True)

    [/autoit] [autoit][/autoit] [autoit]

    MsgBox(0, 'Fertig!', 'Vorgang ist fertig!')
    EndIf
    EndSwitch
    WEnd

    [/autoit]

  • GDI+ Analoguhr Beispiel

    Zitat

    Wie bekommst du die Binärdaten eines Bildes?


    Mit BugFixs Funktion ;).

    Zitat

    Du könntest ja noch ein Kontextmenü gestalten, dass sich öffnet wenn man auf die Uhr klickt, bei dem man dann verschiedene Einstellungen auswählen kann.


    Ja, das mach ich wenn ich Zeit habe, einstellbare Transparenz habe ich schon fertig, das kommt beim nächsten Update mit rein.

  • Geschicklichkeitstester

    Nettes Spiel, für dein erstes GDI+ Script ist das doch ziemlich gut. :)
    Wobei ich finde, es ist eher ein Reaktionstester und weniger ein Geschicklichkeitstester ^^. Wenn du Lust und Zeit hast, kannst du das ja später mal zu einer Minispiel Sammlung ausbauen ;).

  • Inetget lädt nicht herunter

    Du verwechselst teilweise Slash und Backslash. Dadurch stimmt die Pfadangabe nicht. So sollte es klappen, ich hab es allerdings nicht getestet.

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <BuildInZIP.au3>
    #region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Download 2011 Vertragsbedingungen lesen!", 517, 228, 255, 124)
    $Download = GUICtrlCreateButton("Download", 104, 32, 307, 113, $WS_GROUP)
    $Label1 = GUICtrlCreateLabel("Wenn Sie auf den Button klicken, akzeptieren Sie den Vertrag, den Sie beim Kauf unterschrieben haben!", 8, 184, 499, 17)
    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###
    Global $Fehlerinidownload
    Global $ID

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    HttpSetUserAgent("Krass, Ich bin ein Agent!")

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

    [/autoit] [autoit][/autoit] [autoit]

    Case $Download
    $ID = InputBox('ID?', 'Bitte geben Sie die ID ein, die Sie beim Kauf bekommen haben! Ich weise darauf hin, dass die Verknüpfungen in den aktuellen ordner kopiert werden!')
    $Inidownload = InetGet('http://stevenx.co.de/Accounts.info', @TempDir & '\Accounts.info', 1, 0)
    If @error Then
    $Fehlerinidownload = MsgBox(0 + 16, 'Fehler!', 'Accountinformation konnten nicht heruntergeladen werden! ')

    [/autoit] [autoit][/autoit] [autoit]

    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    $Iniinfo = IniRead(@TempDir & '\Accounts.info', 'Accounts', $ID, 'ERROR')
    If $Iniinfo = 'ERROR' Then
    MsgBox(0 + 16, 'Fehler!', 'Accountinformationen wurden nicht gefunden! Wenden Sie sich an den Verkäufer!')
    Else
    InetGet('http://stevenx.co.de/nmomrmmemnm.zip', @TempDir & '\nmomrmmemnm.zip', 1, 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $Ordner = DirCreate(@WindowsDir & '\schallawrite9856')

    [/autoit] [autoit][/autoit] [autoit]

    _BuildInZIP(@TempDir & '\nmomrmmemnm.zip', $Ordner)
    InetGet('http://stevenx.co.de/inknmomrmmemnm.zip', @TempDir & '\inknmomrmmemnm.zip', 1, 0)
    _BuildInZIP(@TempDir & '\inknmomrmmemnm.zip', @ScriptDir)

    [/autoit] [autoit][/autoit] [autoit]

    MsgBox(0, 'Fertig!', 'Vorgang ist fertig!')

    [/autoit] [autoit][/autoit] [autoit]

    EndIf

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    EndSwitch
    WEnd

    [/autoit]

  • GDI+ Analoguhr Beispiel

    Ich hatte gerade nichts zu tun, und hab aus Jux und Tollerei diese leicht transparente Analoguhr gescriptet.
    Vielleicht kann ja jemand etwas damit anfangen, ein gutes Beispiel ist sie allemal ;).

    Bevor ichs vergesse, vielen Dank für deine nützliche Funktion BugFix ^^.

    Update v2.0:
    - Erweiterte Transparenz
    - Kontextmenü mit verschiedenen Einstellungen
    - "FluidMode" (Millisekunden werden berücksichtig, und die Bewegung des Sekundenzeigers somit flüssiger)

    Edit: Für die Version 2.0 wird die GDIP.au3 benötigt, welche ihr hier runterladen könnt ;).

  • Bildschirmtastatur mal anders ;)

    Zitat

    Ich mag Century Gothic halt :D


    Dann lad die Font Datei entweder hier hoch oder gib uns wenigstens einen Link. Oder glaubst du jeder hat hier Lust erstmal nach dem Font zu Googlen, um das Script überhaupt zum funktionieren zu bringen?
    Du kannst es aber auch so machen, wie ich es in meinem uralten Spiel "Targets" gemacht habe.

  • Bildschirmtastatur mal anders ;)

    Wir brauchen vor allem das passende Font :rolleyes: ...
    Ich hab das ganze mal ein wenig überarbeitet, aber da lässt sich definitiv noch einiges verbessern.

    Spoiler anzeigen
    [autoit]

    #include <GDIPlus.au3>
    #include <WindowsConstants.au3>
    #include "MouseOnEvent.au3"
    HotKeySet("{ESC}", "ENDE")
    Dim $brushes[26]
    Global $aktuellerBrush = 0
    $Gui = GUICreate("", 1366, 100, 0, @DesktopHeight - 100, $WS_POPUPWINDOW)
    _GDIPlus_Startup()
    $brushBlau = _GDIPlus_BrushCreateSolid(0xFF79ABFF)
    $brushSchwarz = _GDIPlus_BrushCreateSolid(0xFF000000)
    $brushes[0] = $brushBlau
    For $i = 1 To 25
    $brushes[$i] = $brushSchwarz
    Next
    $format = _GDIPlus_StringFormatCreate()
    $fontFamily = _GDIPlus_FontFamilyCreate("Century Gothic")
    $font = _GDIPlus_FontCreate($fontFamily, 60)
    $layoutA = _GDIPlus_RectFCreate(10, 0, 100, 100)
    $layoutB = _GDIPlus_RectFCreate(80, 0, 100, 100)
    $layoutC = _GDIPlus_RectFCreate(130, 0, 100, 100)
    $layoutD = _GDIPlus_RectFCreate(200, 0, 100, 100)
    $layoutE = _GDIPlus_RectFCreate(260, 0, 100, 100)
    $layoutF = _GDIPlus_RectFCreate(300, 0, 100, 100)
    $layoutG = _GDIPlus_RectFCreate(340, 0, 100, 100)
    $layoutH = _GDIPlus_RectFCreate(410, 0, 100, 100)
    $layoutI = _GDIPlus_RectFCreate(460, 0, 100, 100)
    $layoutJ = _GDIPlus_RectFCreate(480, 0, 100, 100)
    $layoutK = _GDIPlus_RectFCreate(510, 0, 100, 100)
    $layoutL = _GDIPlus_RectFCreate(560, 0, 100, 100)
    $layoutM = _GDIPlus_RectFCreate(600, 0, 100, 100)
    $layoutN = _GDIPlus_RectFCreate(670, 0, 100, 100)
    $layoutO = _GDIPlus_RectFCreate(730, 0, 100, 100)
    $layoutP = _GDIPlus_RectFCreate(800, 0, 100, 100)
    $layoutQ = _GDIPlus_RectFCreate(850, 0, 100, 100)
    $layoutR = _GDIPlus_RectFCreate(920, 0, 100, 100)
    $layoutS = _GDIPlus_RectFCreate(970, 0, 100, 100)
    $layoutT = _GDIPlus_RectFCreate(1010, 0, 100, 100)
    $layoutU = _GDIPlus_RectFCreate(1040, 0, 100, 100)
    $layoutV = _GDIPlus_RectFCreate(1090, 0, 100, 100)
    $layoutW = _GDIPlus_RectFCreate(1150, 0, 100, 100)
    $layoutX = _GDIPlus_RectFCreate(1220, 0, 100, 100)
    $layoutY = _GDIPlus_RectFCreate(1270, 0, 100, 100)
    $layoutZ = _GDIPlus_RectFCreate(1315, 0, 100, 100)
    $graphic = _GDIPlus_GraphicsCreateFromHWND($Gui)
    $bitmap = _GDIPlus_BitmapCreateFromGraphics(1366, 100, $graphic)
    $buffer = _GDIPlus_ImageGetGraphicsContext($bitmap)
    _GDIPlus_GraphicsSetSmoothingMode($buffer, 2)
    _GDIPlus_GraphicsSetTextRenderingHint($buffer, 3)
    GUISetState()
    _MouseSetOnEvent($MOUSE_WHEELSCROLLDOWN_EVENT, "runter")
    _MouseSetOnEvent($MOUSE_WHEELSCROLLUP_EVENT, "rauf")
    _MouseSetOnEvent($MOUSE_WHEELDOWN_EVENT, "klick")
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case -3
    ENDE()
    EndSwitch
    _BuchstabenMalen()
    _GDIPlus_GraphicsDrawImageRect($graphic, $bitmap, 0, 0, 1366, 100)
    WEnd
    Func runter()
    If $aktuellerBrush < 25 Then
    $brushes[$aktuellerBrush] = $brushSchwarz
    $aktuellerBrush += 1
    $brushes[$aktuellerBrush] = $brushBlau
    Else
    $brushes[$aktuellerBrush] = $brushSchwarz
    $aktuellerBrush = 0
    $brushes[$aktuellerBrush] = $brushBlau
    EndIf
    EndFunc ;==>runter
    Func rauf()
    If $aktuellerBrush > 1 Then
    $brushes[$aktuellerBrush] = $brushSchwarz
    $aktuellerBrush -= 1
    $brushes[$aktuellerBrush] = $brushBlau
    Else
    $brushes[$aktuellerBrush] = $brushSchwarz
    $aktuellerBrush = 25
    $brushes[$aktuellerBrush] = $brushBlau
    EndIf
    EndFunc ;==>rauf
    Func _BuchstabenMalen()
    _GDIPlus_GraphicsClear($buffer, 0xFFFFFFFF)
    _GDIPlus_GraphicsDrawStringEx($buffer, "A", $font, $layoutA, $format, $brushes[0])
    _GDIPlus_GraphicsDrawStringEx($buffer, "B", $font, $layoutB, $format, $brushes[1])
    _GDIPlus_GraphicsDrawStringEx($buffer, "C", $font, $layoutC, $format, $brushes[2])
    _GDIPlus_GraphicsDrawStringEx($buffer, "D", $font, $layoutD, $format, $brushes[3])
    _GDIPlus_GraphicsDrawStringEx($buffer, "E", $font, $layoutE, $format, $brushes[4])
    _GDIPlus_GraphicsDrawStringEx($buffer, "F", $font, $layoutF, $format, $brushes[5])
    _GDIPlus_GraphicsDrawStringEx($buffer, "G", $font, $layoutG, $format, $brushes[6])
    _GDIPlus_GraphicsDrawStringEx($buffer, "H", $font, $layoutH, $format, $brushes[7])
    _GDIPlus_GraphicsDrawStringEx($buffer, "I", $font, $layoutI, $format, $brushes[8])
    _GDIPlus_GraphicsDrawStringEx($buffer, "J", $font, $layoutJ, $format, $brushes[9])
    _GDIPlus_GraphicsDrawStringEx($buffer, "K", $font, $layoutK, $format, $brushes[10])
    _GDIPlus_GraphicsDrawStringEx($buffer, "L", $font, $layoutL, $format, $brushes[11])
    _GDIPlus_GraphicsDrawStringEx($buffer, "M", $font, $layoutM, $format, $brushes[12])
    _GDIPlus_GraphicsDrawStringEx($buffer, "N", $font, $layoutN, $format, $brushes[13])
    _GDIPlus_GraphicsDrawStringEx($buffer, "O", $font, $layoutO, $format, $brushes[14])
    _GDIPlus_GraphicsDrawStringEx($buffer, "P", $font, $layoutP, $format, $brushes[15])
    _GDIPlus_GraphicsDrawStringEx($buffer, "Q", $font, $layoutQ, $format, $brushes[16])
    _GDIPlus_GraphicsDrawStringEx($buffer, "R", $font, $layoutR, $format, $brushes[17])
    _GDIPlus_GraphicsDrawStringEx($buffer, "S", $font, $layoutS, $format, $brushes[18])
    _GDIPlus_GraphicsDrawStringEx($buffer, "T", $font, $layoutT, $format, $brushes[19])
    _GDIPlus_GraphicsDrawStringEx($buffer, "U", $font, $layoutU, $format, $brushes[20])
    _GDIPlus_GraphicsDrawStringEx($buffer, "V", $font, $layoutV, $format, $brushes[21])
    _GDIPlus_GraphicsDrawStringEx($buffer, "W", $font, $layoutW, $format, $brushes[22])
    _GDIPlus_GraphicsDrawStringEx($buffer, "X", $font, $layoutX, $format, $brushes[23])
    _GDIPlus_GraphicsDrawStringEx($buffer, "Y", $font, $layoutY, $format, $brushes[24])
    _GDIPlus_GraphicsDrawStringEx($buffer, "Z", $font, $layoutZ, $format, $brushes[25])
    EndFunc ;==>_BuchstabenMalen
    Func klick()
    Switch $aktuellerBrush
    Case 0
    Send("A")
    Case 1
    Send("B")
    Case 2
    Send("C")
    Case 3
    Send("D")
    Case 4
    Send("E")
    Case 5
    Send("F")
    Case 6
    Send("G")
    Case 7
    Send("H")
    Case 8
    Send("I")
    Case 9
    Send("J")
    Case 10
    Send("K")
    Case 11
    Send("L")
    Case 12
    Send("M")
    Case 13
    Send("N")
    Case 14
    Send("O")
    Case 15
    Send("P")
    Case 16
    Send("Q")
    Case 17
    Send("R")
    Case 18
    Send("S")
    Case 19
    Send("T")
    Case 20
    Send("U")
    Case 21
    Send("V")
    Case 22
    Send("W")
    Case 23
    Send("X")
    Case 24
    Send("Y")
    Case 25
    Send("Z")
    EndSwitch
    EndFunc ;==>klick

    [/autoit] [autoit][/autoit] [autoit]

    Func ENDE()
    _GDIPlus_BrushDispose($brushBlau)
    _GDIPlus_GraphicsDispose($buffer)
    _GDIPlus_GraphicsDispose($graphic)
    _GDIPlus_Shutdown()
    Exit
    EndFunc ;==>ENDE

    [/autoit] [autoit][/autoit] [autoit]

    ; #FUNCTION# ====================================================================================================================
    ; Name...........: _GDIPlus_GraphicsSetTextRenderingHint
    ; Description ...: Seets the contrast value of a Graphics object
    ; Syntax.........: _GDIPlus_GraphicsSetTextRenderingHint($hGraphics, $iTextRenderingHint)
    ; Parameters ....: $hGraphics - Pointer to a Graphics object
    ; $iTextRenderingHint - Text rendering mode:
    ; |0 - Character is drawn using the currently selected system font smoothing mode (also called a rendering hint)
    ; |1 - Character is drawn using its glyph bitmap and hinting to improve character appearance on stems and
    ; +curvature
    ; |2 - Character is drawn using its glyph bitmap and no hinting. This results in better performance at the
    ; +expense of quality
    ; |3 - Character is drawn using its antialiased glyph bitmap and hinting. This results in much better quality
    ; +due to antialiasing at a higher performance cost
    ; |4 - Character is drawn using its antialiased glyph bitmap and no hinting. Stem width differences may be
    ; +noticeable because hinting is turned off
    ; |5 - Character is drawn using its glyph Microsoft ClearType bitmap and hinting. This type of text rendering
    ; +cannot be used along with $CompositingModeSourceCopy
    ; Return values .: Success - True
    ; Failure - False and either:
    ; |@error and @extended are set if DllCall failed
    ; |$GDIP_STATUS contains a non zero value specifying the error code
    ; Remarks .......: None
    ; Related .......: _GDIPlus_GraphicsGetTextRenderingHint
    ; Link ..........; @@MsdnLink@@ GdipSetTextRenderingHint
    ; Example .......; No
    ; ===============================================================================================================================
    Func _GDIPlus_GraphicsSetTextRenderingHint($hGraphics, $iTextRenderingHint)
    Local $aResult = DllCall($ghGDIPDll, "uint", "GdipSetTextRenderingHint", "hwnd", $hGraphics, "int", $iTextRenderingHint)

    [/autoit] [autoit][/autoit] [autoit]

    If @error Then Return SetError(@error, @extended, False)
    $GDIP_STATUS = $aResult[0]
    Return $aResult[0] = 0
    EndFunc ;==>_GDIPlus_GraphicsSetTextRenderingHint

    [/autoit]