Pausieren

  • [autoit]

    Global $Paused
    HotKeySet("{PAUSE}", "TogglePause")
    HotKeySet("{ESC}", "Schließen") ; Pasue einfach ein 2 mal drücken und der script geht weiter

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

    ;;;; Hier ist der Hauptteil des Programms ;;;;
    While 1
    Sleep(100) ; HIER KOMMT DEIN SCRIPT HIN
    WEnd
    ;;;;;;;;

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

    Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
    sleep(100)
    ToolTip('Script ist pausiert',0,0)
    WEnd
    ToolTip("")
    EndFunc

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

    Func Schließen()
    Exit 0
    EndFunc

    [/autoit]


    Aus der Deutschen Hilfe .

  • Spoiler anzeigen
    [autoit]

    HotKeySet ("{F7}","_Start")
    HotKeySet ("{F8}","_Ende")
    HotKeySet ("{F5}","_Pause")

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

    _Pause()

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

    Func _Start()
    While (1)
    Send ("y",0)
    Sleep (10) ;
    WEnd
    EndFunc

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

    Func _Pause()
    While 1
    Sleep(99999)
    WEnd
    EndFunc

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

    Func _Ende()
    Exit
    EndFunc

    [/autoit]