Hi zusammen...
schaut euch mal bitte kurz dieses Script an:
[autoit];~ script for next sample automation
[/autoit][autoit][/autoit][autoit]#include <Misc.au3>
$dll = DllOpen("user32.dll")
WinWait("Analyst -", "")
[/autoit][autoit][/autoit][autoit]Dim $play
Dim $time = 15
Dim $exit = 1
HotKeySet("^{SPACE}", "starten")
HotKeySet("^{x}", "stoppen")
HotKeySet("^{e}", "_exit")
While $exit
While $play = 1
WinActivate("Analyst -", "")
ControlSend("Analyst -", "", "AfxOleControl42u2", "^{RIGHT}")
AdlibRegister("_Countdown", 1000)
While $time > 0 And $play = 1
ToolTip($time)
Sleep(10)
If _IsPressed("04", $dll) Then
WinActivate("Analyst -", "")
ControlSend("Analyst -", "", "AfxOleControl42u2", "^{RIGHT}")
ExitLoop
EndIf
WEnd
ToolTip($time)
AdlibUnRegister("_Countdown")
$time = 15
WEnd
Sleep(250)
WEnd
Func _Countdown()
$time -= 1
EndFunc ;==>_Countdown
Func starten()
$play = 1
EndFunc ;==>starten
Func stoppen()
AdlibUnRegister("_Countdown")
$play = 0
EndFunc ;==>stoppen
Func _exit()
$play = 0
$exit = 0
EndFunc ;==>_exit
DllClose($dll)
[/autoit]Kurze Erklärung:
Der Befehl "ControlSend("Analyst -", "", "AfxOleControl42u2", "^{RIGHT}")" bewirkt ein Wechsel eines Bildes...
Kann mir jemand verraten, wieso bei dem Befehl " If _IsPressed("04", $dll) Then" der ControlSend 2x ausgeführt wird??? Wie muss ich das Script ändern, damit ich mit dem MausRadKlicken nur einmal den ControlSend-Befehl verschicke!?!?
Vielen Dank