1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. autoBert

Beiträge von autoBert

  • Listview unterstützung

    • autoBert
    • 18. März 2013 um 17:57

    Da ich auf Grund der Spaltenüberschriften einen gewerblichen Hintergrund sehe solltest du in http://www.autoit.de/index.php?page=Board&boardID=35 ein Thema erstellen, sollte ich mich irren geht auch http://www.autoit.de/index.php?page=Board&boardID=52 .
    In beiden Fällen solltest du eine umfangreiche Datensammlung in deiner Datenbank.txt beilegen.
    Solltest du es allerdings selbst lösen wollen (was nicht so schwer ist) aolltest du eine Funktion entwickeln der du das zu prüfende Datum übergibst und einen Wert (z.B. 0, 1, 2) zurück bekommst auf Grund dessen du dann das Subitem einfärbst. Für diese Funktion benötigst du _DateDiff:

    Spoiler anzeigen
    [autoit]

    #include <Date.au3>

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

    $iDateCalc = _DateDiff( 'm',"2012/12/18 00:00:00",_NowCalc())
    MsgBox( 4096, "", "Number of month since 2012/12/20: " & $iDateCalc )

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

    $iDateCalc = _DateDiff( 'd',"2012/12/18 00:00:00",_NowCalc())
    MsgBox( 4096, "", "Number of days since 2012/12/20: " & $iDateCalc )

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

    wobei ich die Tagesversion vorziehen würde.

    mfg autoBert

  • AutoIT führt Befehl in Fenster nicht richtig aus.

    • autoBert
    • 18. März 2013 um 12:01
    Zitat von x0r

    Wieso führst du das Video nicht direkt aus?


    Weil das nie seine Absicht war, er will eigentlich für Fifa 13 ein Klickbot machen, hat deshalb mittlerweile im "bösen" Forum ein Thema dazu:

    Zitat

    Mein Problem: Ich wollte mir für das Spiel FIFA 13 ein Script schreiben, welches im Spiel ganz simpel einfach nach einer gewissen Zeit auf gewisse Flächen klicked ( oder Tastendrückt ).
    ...
    Das hier ist nur ein kleiner Auszug von dem Beginn. Ansich müsste er doch nun immer wieder auf die angegebenen Koordianten klicken, tut dies jedoch nicht. Er klickt einfach nicht.. die Maus bewegt sich zwar zu der Stelle, jedoch ist es, als würde sie nicht klicken.


    Da es sehr schlecht mit seiner Problembeschreibung hier möglich ist zu seiner gewünschten Lösung zu kommen, für das hier beschriebene Problem aber schon Lösungen aufgezeigt wurden: Vote for Close

    mfg autoBert

  • AutoIT führt Befehl in Fenster nicht richtig aus.

    • autoBert
    • 17. März 2013 um 22:21
    Zitat von perdox

    gut, also liegt es nicht an mir und dem script, sondern am programm ansich.... schonmal gut zu wissen, dass ich nicht der blöde bin ^^


    indirekt schon

    • Zitat von chesstiger

      Um welchen Videoplayer geht es denn?
      Evtl. bietet er ja eine Autoplay-Funktion per Commandline an.

      oder meinst du hier ist jemand so blöd wie man einen (nicht vorhandenen) HackShield in einem Videoplayer umgeht :?:

    • also hast du deine Zeit verschwendet in dem du andere für Blöd verkaufen wolltest. Ein Blick in die Forenregeln die du akeptiert aber anscheinend nicht gelesen hast wäre effizienter gewesen.

    mfg autoBert

  • Listview unterstützung

    • autoBert
    • 17. März 2013 um 22:11

    Ist möglich siehe dazu: ListView - SubItem einzeln färben/formatieren, Finale Version! (v1.3)

    mfg autoBert

  • Minecraft Server Userliste

    • autoBert
    • 17. März 2013 um 22:00
    Zitat von sezer0012

    Ich arbeite schon ein halbes Jahr mit AutoIt und ich denke das reicht für das was ich immer mache.

    anscheinend nicht sonst hättest du dieses Thema nicht eröffnet :!:

    Zitat von sezer0012

    Ich bin noch ein Anfänger, wie kann ich mehrere Befehle in eine Variable stellen so das ich StdoutRead($Variable) machen kann?

    Hilfe lesen bildet weiter, du Ignorant hast sie immer noch nicht gelesen.

    Zitat von sezer0012

    So gelöst,

    Schön dann ist dein Problem ja gelöst. Schön wäre es allerdings auch wenn du das Thema auf gelöst setzt.
    Dazu einfach den Eröffnungsbeitrag bearbeiten und den Präfix (nähe) Überschrift auf gelöst setzen und absenden.

    danke ;) autoBert

  • GUI Sperren solange command ausgeführt wird

    • autoBert
    • 17. März 2013 um 14:50

    RunWait wäre eine andere Möglichkeit:

    Zitat

    RunWait

    Startet ein externes Programm und pausiert die Ausführung des Autoit-Skripts, bis das externe Programm beendet ist.

    Quelle: dt. Hilfeübersetzung

    mfg autoBert

  • Funktion wird nicht ausgeführt.

    • autoBert
    • 17. März 2013 um 14:44
    Zitat von Make-Grafik

    Es ist tatsächlich kein Spielebot sondern soll weitere Spielfeatures einfügen.
    (Soviel ich aus dem Code verstanden habe)

    Die betroffene Seite ist https://autoit.de/www.rotlichtking.com (wie Freeman schon erwähnte...)
    Unten auf der Startseite ist eindeutig "Design © by Freeman" zu erkennen.


    Kann ich bestätigen imho keine Spielebot im Sinne unserer Forenregeln.
    Leider muss ich aber auch

    Zitat von Make-Grafik

    allerdings ist mir der Code zu "unsauber" etc... (Wenn ich das früher gewusst hätte :P)

    bestätigen so das für mich ein Privatsupport per PN nicht in Frage kommt. Wer debuggt schon gerne fremden Skriptcode?

    mfg autoBert

  • txt zeile mit Endung rauswerfen

    • autoBert
    • 17. März 2013 um 13:34
    Zitat von Make-Grafik

    Die Variable (bzw. Parameter) $_String wird gar nicht verwendet...

    ist leider durch C&P passiert, deshalb jetzt das aufgeräumte Skript zusätlich etwas kommentiert:

    Spoiler anzeigen
    [autoit]

    #include <File.au3>
    #include <Array.au3>

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

    Global $aArray
    _FileReadToArray('ACL.txt', $aArray)
    If IsArray($aArray) Then
    _ArrayDisplay($aArray, 'vorher')
    $aArray = _DeleteArrayElementWithFileExtatEnd($aArray)
    _ArrayDisplay($aArray, 'nachher')
    _FileWriteFromArray('ACL_New.txt', $aArray, 1)
    Else
    MsgBox(0, 'Fehler', 'Array micht vorhanden')
    EndIf

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

    Func _DeleteArrayElementWithFileExtatEnd($aArray)
    Local $iItems, $aSplit
    For $iItems = UBound($aArray) - 1 To 1 Step -1 ;von hinten anfsngen da durch jeden Löschvorgang sich ja das Array ändert
    $sElement = StringReplace($aArray[$iItems] & '.', '..', '.') ;sicherstellen das jede Zeile ein Punkt am Ende hat
    $aSplit = StringSplit($sElement, '\')
    StringReplace($aSplit[$aSplit[0]], '.', '')
    ConsoleWrite($aSplit[$aSplit[0]] & @TAB & @extended & @CRLF)
    If @extended > 1 Then _ArrayDelete($aArray, $iItems) ;da nur bei FileExt. ein 2. Punkt vorhanden löschen
    Next
    $aArray[0] = UBound($aArray) - 1
    Return ($aArray)
    EndFunc ;==>_DeleteArrayElementWithFileExtatEnd

    [/autoit]
    Zitat von cobain86

    klappt! Danke
    jetzt muss ich den code nur noch verstehen


    Bitte, ist ganz einfach: das Skript beruht auf der Tatsache das eine Dateierweiterung einen Punkt enthält. Da aber manche nicht zu löschende Zeilen auch einen Punkt am Ende haben und manche zu löschende aber keinen sorge ich in Zeile 18 dafür daß jedes Arrayelement mit einem Punkt endet. In Zeile 19 splitte ich das Element auf um in Zeile 20 im letzten Splitteil alle Punkte zu ersetzen. Da Stringreplace in @exended freundlicherweise die Anzahl der Ersetzungen speichert lösche ich in Zeile 22 alle Arrayelemente bei denen mehr als 1 Ersetzung vorkam. Also alles keine Hexerei.

    mfg autoBert

  • GUI Rand.

    • autoBert
    • 16. März 2013 um 23:03

    Für die runden Ecken sind DLL-Calls zuständig:

    Spoiler anzeigen
    [autoit]

    ISetState(@SW_SHOW) ; Zeigt das leere GUI-Fenster
    _GuiRoundCorners($hGui, 0, 0, 30, 30)

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

    ; Die Schleife wiederholt sich, bis der Benutzer die Beenden-Aktion der GUI auslöst
    While 1
    $msg = GUIGetMsg()

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

    If $msg = -3 Then Exit
    WEnd

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

    Func _GuiRoundCorners($h_win, $i_x1, $i_y1, $i_x3, $i_y3)
    Local $XS_pos, $XS_ret, $XS_ret2
    $XS_pos = WinGetPos($h_win)
    $XS_ret = DllCall("gdi32.dll", "long", "CreateRoundRectRgn", "long", $i_x1, "long", $i_y1, "long", $XS_pos[2], "long", $XS_pos[3], "long", $i_x3, "long", $i_y3)
    If $XS_ret[0] Then
    $XS_ret2 = DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $h_win, "long", $XS_ret[0], "int", 1)
    EndIf
    EndFunc ;==>_GuiRoundCorners

    [/autoit]

    ist nicht von mir habe ich in meiner Anfangszeit irgendwo gefunden. Wenn du die Gui im PopUpstil selbst erzeugst sieht es besser aus. Allerdings musst du dann auch das Schliessen-Icon selbst einfügen. Schau dir dazu meinen MP3-Player an, ich verwende dort zwar keine runden Ecken wäre aber schnell eingefügt:

    [autoit]

    Global $idfrmMain = GUICreate($sProgTitel & $sProgVer, $iWidht, $iHeight, IniRead($sLiz, "Pos", "x", "20"), IniRead($sLiz, "Pos", "y", "20"), BitOR($WS_POPUPWINDOW, $WS_THICKFRAME), $WS_EX_CONTROLPARENT)
    _GuiRoundCorners($idfrmMain, 0, 0, 30, 30)

    [/autoit]

    mfg autoBert

  • Funktion wird nicht ausgeführt.

    • autoBert
    • 16. März 2013 um 22:10

    @Chess: ich habe ihm eine PN geschickt, darauf kann er antworten. Darin habe ich ihm mitgeteilt dass ich hier für Closen plädiere sollte es sich Forenregel kompatibel sein.

    Edit: sehe gerade dass Freemann sich noch vor dem Erhalt meiner PN abgemeldet ausgeloggt hat, von daher spricht nichts gegen ein vorläufiges Schliessen. Sollte es sich imho um Forenregeln kompatibel herausstellen teile ich es einem Mod per PN mit. Bzw. Freemann kann ja zusätzlich dem schliessenden Mod die Daten schicken. Dann kann dieser schon prüfen und evtl. wieder öffnen, ich bin ja auch nur 2* am Tag für ein paar Stunden online.

    mfg autoBert

  • Funktion wird nicht ausgeführt.

    • autoBert
    • 16. März 2013 um 21:26

    Ist ohne deine INI(s) nicht lauffähig:

    Code
    >"D:\Programme\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "D:\Programme\AutoIt3\Test\test.au3" /autoit3dir "D:\Programme\AutoIt3" /UserParams    
    +>21:12:52 Starting AutoIt3Wrapper v.2.0.0.1    Environment(Language:0407  Keyboard:00000407  OS:WIN_XP/Service Pack 3  CPU:X86 OS:X86)
    >Running AU3Check (1.54.19.0)  from:D:\Programme\AutoIt3
    +>21:12:53 AU3Check ended.rc:0
    >Running:(3.3.6.1):D:\Programme\AutoIt3\autoit3.exe "D:\Programme\AutoIt3\Test\test.au3"    
    D:\Programme\AutoIt3\Test\test.au3 (298) : ==> Subscript used with non-Array variable.:
    For $ch = 1 To $eintrag[0]
    For $ch = 1 To $eintrag^ ERROR
    ->21:13:02 AutoIT3.exe ended.rc:1
    +>21:13:04 AutoIt3Wrapper Finished
    >Exit code: 1    Time: 11.977
    Alles anzeigen

    oder hast du das Herunterladen der Ini(s) in global.au3?

    dieser Abschnitt:

    [autoit]

    $sDest &= '<td><strong><span>Angebot</span></strong></td>' & @CRLF
    $sDest &= '<td><strong><span>Schmiergeld $</span></strong></td>' & @CRLF
    $sDest &= '<td><strong><span>Verdienst $</span></strong></td>' & @CRLF
    $sDest &= '<td><strong><span>Laufzeit in Min</span></strong></td>' & @CRLF
    $sDest &= '</tr>' & @CRLF

    [/autoit]

    bringt mich zu dem Schluss dass es sich um einen Spielebot handelt. Ein veröffentlichen der Ini(s) könnte das wiederlegen.
    Du hast zwar deine (echten?) Zugangsdaten im Skript diese solltest du so nicht bereits geschehen anonymisieren sonst hast du bald keine Kontrolle mehr über deinen FTP-Server.

    mfg autoBert

  • Funktion wird nicht ausgeführt.

    • autoBert
    • 16. März 2013 um 20:42

    IniReadSection gibt ein 2D-Array zurück. Wenn du professinelle Hilfe willst solltest du dein komplettes (Beispiel-) Skript posten, so zieht sich das Thema unnötig in die Länge.

    mfg autoBert

  • txt zeile mit Endung rauswerfen

    • autoBert
    • 16. März 2013 um 20:18

    Ich würde es so lösen:

    Spoiler anzeigen
    [autoit]

    #include <File.au3>
    #include <Array.au3>

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

    Global $aArray
    _FileReadToArray('ACL.txt', $aArray)
    _ArrayDisplay($aArray, 'vorher')
    $aArray = _DeleteArrayElementWithFileExtatEnd($aArray, '.mp3.')
    _ArrayDisplay($aArray, 'nachher')
    _FileWriteFromArray('ACL_New.txt', $aArray, 1)
    Func _DeleteArrayElementWithFileExtatEnd($aArray, $_String)
    Local $iItems, $aSplit
    For $iItems = UBound($aArray) - 1 To 1 Step -1
    $sElement = StringReplace($aArray[$iItems] & '.', '..', '.') ;damit jede Zeile ein Punkt am Ende hat
    $aSplit = StringSplit($sElement, '\')
    StringReplace($aSplit[$aSplit[0]], '.', '')
    If @extended > 1 Then _ArrayDelete($aArray, $iItems)
    Next
    $aArray[0]=UBound($aArray) - 1
    Return ($aArray)
    EndFunc ;==>_DeleteArrayElementWithFileExtatEnd

    [/autoit]

    mfg autoBert

  • einen von Autoit gestartetes Programm überwachen und gegebenenvals beenden

    • autoBert
    • 14. März 2013 um 18:48

    Nimm statt RunAsWait RunAs und prüfe in einer Schleife ob der der Process noch existiert bzw. eine vorgegebene Zeit überschritten ist.

  • Ftp Updater

    • autoBert
    • 13. März 2013 um 11:45
    Zitat von timyboy

    Erbitte auch die Schliessung! Damit die Märchenstunde von autobert endlich ein Ende hat..


    Der Märchenertähler in diesem und auch anderenThemen bist und bleibst du:

    • Du hast in diesem Thema bis jetzt noch nicht die Webseiten benannt von denen du downloaden willst, erklärst aber du hättest die Anforderungen genau definiert.
    • du gibst dir keine Mühe, denn obwohl ich dich bereits in dem Vorläufer-Thema zu diesem (Copy & Paste des Eröfnungsbeitrags) aufgefordert hatte das fehlende Include einzustellen fehlte es auch hier wieder

    Da du gerne Spuren verwischt und deine Beiträge löschst )auch schon in [ offen ] Ftp Updater - Hilfe wird benötigt passiert, dort hat ein freundlicher Admin/Mod diese weider hergestellt) plädiere ich dafür:

    • alle Themen von dir zu sperren aber von dir gelöschte Beiträge zuvor wieder herzustellen.
    • dich wegen deinem Täuschungsversuchen und Beleidigungen (hier und in anderen Themen) zu sperren.

    mfg autoBert
    [/list]

  • [Beispiel] Update 13.03.13 FTP-Downloader (rekursiv mit allen Unterverzeichnissen)

    • autoBert
    • 13. März 2013 um 11:09
    Zitat von Diggidie

    Eine Frage, bzw einen Erweiterungvorschlag, habe ich dennoch...
    Ist es evtl. noch machbar (bestimmt, nur hab ich da kein Plan von, und könnte es sehr gut gebrauchen)
    eine einstellbare Pfadtiefe (als z.B. "lese nur die ersten drei Ebenen ein") mit einzubauen?


    Sollte kein Problem darstellen, ich schau bei Gelegenheit danach.
    Für die komfortable Version (AutoIt 3.6.6.1) erledigt.

    mfg autoBert

  • Ftp Updater

    • autoBert
    • 13. März 2013 um 04:46
    Zitat von timyboy

    Und was spricht dagegen, wenn man einen Updater sucht mit den gewünschten Vorstellungen?


    Hier in diesem Forum die Forenregeln wenn man davon ausgeht dass eine der Seiten von denen du automatiesiert downloaden willst immer noch:

    Zitat von timyboy

    Ich habe ein gutes UpdatesScript gefunden, was bei FileHippo nach dem passendem Update schaut. Nur leider ist mir das Angebot etwas mager... deshalb wollte ich fragen, was man am Script umstellen muss , damit das Script sich auf softpedia.com umschaut + updatet?

    ist, diese Seite verbietet aber die Veränderung/Ausblendung ihrer Logos.
    Und der grosse Witz im obigen Thema ist:

    Zitat

    ok, danke für den hinweis.

    jetzt kann ich auf einmal nicht mehr mit diesem script downloaden??? bis gestern ging es noch, hat sich da etwas verändert?

    von filehippo.com kann ich mit diesem Skript immer noch downloaden.

    Hättest du aus Beiträgen wie diesem:

    Zitat von name22

    Wenn das mit den AGBs für jeden geplanten Anbieter geklärt wird wäre es kein Problem, das als Programmieranfrage zu stellen.

    deine Lehren gezogen und 3,4 Downloadadressen genannt die Forenregel kompatibel sind hätte vielleicht sogar ich dir ein Angebot gemacht. Aber nach lesen des 1. Beitrags von Minx habe ich mich an die alte Geschichte erinnert. Obwohl ich es nicht nötig habe, zum Thema "programmieren können" solltest du dir vielleicht einmal aufmerksam die Beispiele in der Hilfe zu verschiedenen _FTP****-Funktionen anschauen z.B.: _FTP_FilePut. Danach kannst du dir ja überlegen wie mein Name da wohl hinein gekommen ist.

    Zitat von minx

    Deshalb schließe ich mich an: Vote 4 Close

    Habe ich etwas überlesen? Egal ich schliess mich auch an:

    Vote for Close

  • Ftp Updater

    • autoBert
    • 12. März 2013 um 17:16
    Zitat von minx

    In der neuen längeren Beschreibung sind die betroffenen URLs eindeutig ausgeführt. Kein Regelverstoß, zumal die Skripte selbst aus dem engl. Forum stammen.


    Die sind doch nur Platzhalter damit ihm nicht schon wieder ein Thema geschlossen wird, das nächste wurde zwar nicht geschlossen aber in diesem stehen imho die echten Downloadziele mind. 1 verstösst gegen die Forenregeln.
    Bin mal gespannt wie der Auftragnehmer reagiert wenn Timyboy seine echten URL's stattdessen einsetzt und danach moniert das Skript funktioniert nicht mehr.

    Edit: ich hab mir jetzt die Beschreibung und auch die URL's angeschaut imho ein Aufruf um ein Plagiat zu erstellen :cursing:
    Er benennt nur indirekt Seiten von der er Downloaden möchte.
    Im übrigen hat das engl. Forum andere Regeln als unseres.

    mfg autoBert

  • Ftp Updater

    • autoBert
    • 12. März 2013 um 14:55
    Zitat von timyboy

    autoBert Wer hat, der KANN.. ;)

    und wer nichts kann muss für alles bezahlen. Deine Definition der Anforderungen sind übrigens immer noch nicht vollständig oder hast du diese zurückgeschraubt weil eingesehen das in diesem Forum auch gegen Bezahlung niemand bereit ist gegen die Forenregeln zu verstossen?
    Dass du hier und auch im bösen Forum immer wieder deine Updatergeschichte aufwärmst zeigt mir dass man auch mit Geld nicht alles bekommt bzw. dein Taschengeld nicht ausreicht.
    Aber wenn wir schon beim haben sind: Hast du überhaupt eine statische IP?

    mfg autoBert

  • Alle Pixel einer PNG-Datei die nicht einem bestimmter Farbe entsprechen auf Transparent setzen

    • autoBert
    • 12. März 2013 um 14:16

    Hallo Com,

    für ein kleines Spiele-/Quizprojekt möchte ich Landkarten bis auf eine Stadt auf Volltransparent setzen, ausserdem benötige ich noch ein Array welches die Bildkoordinaten der Stadt enthält. Hier mein Ansatz:

    Spoiler anzeigen
    [autoit]

    #include <GDIPlus.au3>
    #include <GDIP.au3>
    #include <Array.au3>
    _GDIPlus_Startup()
    $hBitmap = _GDIPlus_BitmapCreateFromFile('D:\Programme\AutoIt3\MyDemos\HeimatkundeQuiz\Karten\Berlin2.png')
    $iWidth = _GDIPlus_ImageGetWidth($hBitmap)
    $iHeight = _GDIPlus_ImageGetHeight($hBitmap)
    Dim $aArray[$iWidth][$iHeight]

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

    For $iX = 0 To $iWidth -1
    For $iY = 0 To $iHeight - 1
    $sHex=Hex(_GDIPlus_BitmapGetPixel($hBitmap, $iX, $iY))
    ConsoleWrite($iX&'/'&$iY&': '&$sHex&@CRLF)
    If $sHex='FFC11E1E' Then
    $aArray[$iX][$iY]=1
    Else
    $aArray[$iX][$iY]=0
    _GDIPlus_BitmapSetPixel($hBitmap, $iX, $iY,0xFFFFFFFF)
    EndIf
    Next
    Next
    _GDIPlus_ImageSaveToFile($hBitmap,'D:\Programme\AutoIt3\MyDemos\HeimatkundeQuiz\Karten\Berlin.png')
    _GDIPlus_BitmapDispose($hBitmap)
    _GDIPlus_Shutdown()

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

    _ArrayDisplay($aArray)

    [/autoit]

    Obwohl mir die Konsolenausgabe den gesuchten Wert:

    Code
    99/52: FFBD2121
    99/53: FFC11E1E
    99/54: FFC11E1E
    99/55: FFC11E1E
    99/56: FFA8605C

    ausgibt schlägt die nachfolgende Prüfung (Zeile 14) schief, dadurch ist naürlich auch das geänderte Bild für den Mülleimer. Ich benutze AutoIt 3.6.6.1 auf Win XP SP3.

    Edit: Lösung

    Spoiler anzeigen
    [autoit]

    #include <GDIPlus.au3>
    #include <GDIP.au3>
    #include <Array.au3>
    _GDIPlus_Startup()
    ;ConsoleWrite(Dec('C11E1E')&@CRLF)
    ;Exit
    $hBitmap = _GDIPlus_BitmapCreateFromFile('D:\Programme\AutoIt3\MyDemos\HeimatkundeQuiz\Karten\Berlin2.png')
    $iWidth = _GDIPlus_ImageGetWidth($hBitmap)
    $iHeight = _GDIPlus_ImageGetHeight($hBitmap)
    Dim $aArray[$iWidth][$iHeight]

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

    For $iX = 0 To $iWidth -1
    For $iY = 0 To $iHeight - 1
    $sHex= Hex(_GDIPlus_BitmapGetPixel($hBitmap, $iX, $iY),6)
    $iColor=Dec($sHex)
    ;ConsoleWrite($iX&'/'&$iY&': '&$iColor&@CRLF)
    If $iColor = 12656158 Then
    $aArray[$iX][$iY]=$iColor
    Else
    $aArray[$iX][$iY]=0
    _GDIPlus_BitmapSetPixel($hBitmap, $iX, $iY,0xFF)
    EndIf
    Next
    Next
    _GDIPlus_ImageSaveToFile($hBitmap,'D:\Programme\AutoIt3\MyDemos\HeimatkundeQuiz\Karten\Berlin.png')
    _GDIPlus_BitmapDispose($hBitmap)
    _GDIPlus_Shutdown()

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

    _ArrayDisplay($aArray)

    [/autoit]

    mfg autoBert

    Bilder

    • Berlin2.png
      • 16,13 kB
      • 123 × 166

    Dateien

    GDIP.7z 507,16 kB – 379 Downloads

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™