Guten Tag,
als erstes möchte ich Sagen, ich möchte kein Profi im AutoIT werden.
Ich habe angefangen, mit ein simples (für mich aber eine Tagesarbeit, da ich ganz neu mit AutoIT begonnen habe) Program zu erstellen, welches am Photoshop gemachte Karteikarten (Vokabeln) weiter klickt. Also das Program (das tut es immerhin) soll mir eine Karte anzeigen und dann im zufälligen Zeitfenster eine neue Karte zeigen...
Das Problem:
Ich schaffe es so nicht, die IniWrite Funktion einzubauen. Ich möchte das Zeitfenster variabel einstellen können (Anfangs langsam zum lernen, dann schneller zum trainieren)... Ich glaube, ich habe da mit den Schleifen ein Problem bzw ich weis nicht wie ich das jetzt anstellen kann.... Abgesehen davon möchte ich, da ich das kleine Program an Unifreunde schicken will, eine kleine Information über den Button "$beschreibung" anzeigen... Also ein Popup fenster, wo ich eben kurz erkläre dass man die Zeitspanne da einstellen kann....
Klingt Simpel aber ich schaffe es nicht die Iniread/Write Funktion in die Schleife zu bekommen - dass es eben nicht endlos in die Config schreibt.
Wie gesagt, ich möchte nur das kleine Tool machen, mehr nicht.... Ich habe schon viel Anfängertutorials gemacht, leider bin ich jetzt überfordert oder ausgepowert BIn wie gesagt von 0 gestartet....
Achja, hier mein Code (Sicherlich typisch Anfänger) Bitte verweist mich nicht auf ein Tutorial - ich habe schon so viele gelesen : (
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt('GUIOnEventMode', 1)
$hWnd = WinGetHandle("Windows Fotoanzeige")
Global $modus = False
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1_1_1 = GUICreate("Blatterer", 186, 107, 321, 314)
GUISetBkColor(0xABABAB)
$Start = GUICtrlCreateButton("Start", 11, 5, 81, 33)
$Stop = GUICtrlCreateButton("Stop", 92, 5, 81, 33)
$bis = GUICtrlCreateInput("3000", 53, 42, 37, 21)
$speichern = GUICtrlCreateButton("Übernehmen", 92, 40, 81, 25)
$von = GUICtrlCreateInput("2000", 12, 42, 37, 21)
$beschreibung = GUICtrlCreateButton("Beschreibung", 13, 72, 153, 25) ; Hier soll ein Popup aufgehen, wo ich eine kleine Erklärung mitteilen möchte. (Text)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
#cs Ich Schaffe es nicht diese Funktion einzubringen bzw das Program scheint dann in dieser Funktion hängen zu bleiben :(
Dim $ini = @ScriptDir & "\Config.ini"
Dim $AngabeVON = IniRead ("Config.ini", "Benutzerdaten", "von", GUICtrlRead($von))
Dim $AngabeBIS = IniRead ("Config.ini", "Benutzerdaten", "bis", GUICtrlRead($bis))
$nMsg = GUIGetMsg()
Switch $nMsg
Case $speichern
IniWrite("Config.ini", "Benutzerdaten", "von", GUICtrlRead($von))
IniWrite("Config.ini", "Benutzerdaten", "bis", GUICtrlRead($bis))
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
#ce
GUICtrlSetOnEvent($Start, '_start')
GUICtrlSetOnEvent($Stop, '_stop')
GUISetOnEvent($GUI_EVENT_CLOSE, '_exit')
While Sleep(10)
If $modus = True Then
$hWnd = WinGetHandle("BlueStacks App Player")
ControlClick($hwnd, "", "", "left",1, Random(10,25), Random(325,370))
Sleep(Random(1000,2000)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Hier sollte eigentlich dann $AngabeVON,$AngabeBIS stehen....
ControlClick($hwnd, "", "", "left",1, Random(339,355), Random(325,370))
Sleep(Random(1000,3000))
EndIf
WEnd
Func _exit()
Exit
EndFunc
Func _start()
$modus = True
EndFunc
Func _stop()
$modus = False
EndFunc
Alles anzeigen