Hallo! Ich habe eben mein erstes großes Script fertiggestellt und wollte eigentlich nur noch "schnell" die Funktion fuer den Quit-Knopf einbauen... Ja, das war heute Nachmittag um 16 Uhr(-.-). Ich poste mal ein Teil meines Scripts, damit ihr sehen koennt wie ich es gemacht habe.
$Code = 0
$Notepad = 0
GuiCreate("MyGUI", 170, 20,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))
$OK = GuiCtrlCreateButton("Create", 0, 0, 85, 20)
$Exit = GuiCtrlCreateButton("Exit", 85, 0, 85, 20)
GUISetState(@SW_SHOW)
While 1
$msg = GUIGetMsg()
If $msg = $GUI_EVENT_CLOSE Then ExitLoop
If $msg = $OK And $Code = 0 Then
GUISetState(@SW_HIDE)
ProcessClose("IEXPLORE.exe")
Sleep(50)
Script1()
$Notepad = 1
$Code = 1
Script2()
ElseIf $msg = $OK And $Code = 1 Then
Sleep(50)
GUISetState(@SW_HIDE)
Script3()
$Code = 0
New()
If $msg = $Exit Then
Save()
EndIf
EndIf
WEnd
Func Save()
Sleep(100)
ProcessClose("IEXPLORE.exe")
Sleep(100)
WinActivate("Unbenannt - Editor")
Sleep(50)
WinWaitActive("Unbenannt - Editor")
Sleep(50)
Send("{ALT down}")
Sleep(50)
Send("d")
Sleep(50)
Send("u")
Sleep(50)
Send("{ALT up}")
WinWaitActive("Speichern unter")
Sleep(100)
Date()
Sleep(50)
Send(".txt")
Sleep(100)
Send("{ENTER}")
Sleep(50)
Exit
EndFunc
Das sollte das Wichtigste sein.
Der Exit Button soll also quasi eine bereits offene Textdatei abspeichern und das Script beenden. Es ist vollkommen egal was ich da rein schreibe, der Knopf geht einfach nicht. Ich habs auch schon auf anderen Wegen probiert aber letztendlich stell ich nur mein ganzes Script auf den Kopf und es entstehen Probleme an anderen Ecken. *help*