Methusalem
Anmeldedatum: 23.12.2006 Beiträge: 9 Wohnort: Graz
|
Verfasst am: Do Dez 28, 2006 1:57 pm Titel: Script soll nach Programmende weiterlaufen |
|
|
Hallo zusammen!
Vor einiger Zeit wurde in einem Posting eine Lösung gesucht, wie nach Ablauf eines im Script gestarteten Programmes weitere Aktionen gesteuert werden können. Finde das posting nicht mehr.
Habe heute so etwas gebraucht und poste eine Lösung; falls zu uninteressant oder zu primitiv: Moderator, bitte einschreiten!
| Code: |
/*
--------------------------------------------------------------
Beispiel:
Nach dem Schließen des via AHK gestarteten Programmes soll
das Skript noch am Leben bleiben, um zB. ein Backup zu steuern
---------------------------------------------------------------
*/
;Um das Script nach Beenden von Notepad am
;Leben zu halten: -> KeepAlive = 1 setzen!
KeepAlive := 0
#SingleInstance
#NoTrayIcon
SetTitleMatchMode, 2
;Zum Beispiel Notepad:
#IfWinActive ahk_class Notepad
Hotkey, ^!b, BACKUP
Run, Notepad.exe, , , PID
SetTimer, Ende, 1000
return
Ende:
IfWinExist, ahk_pid%PID%
{
return
}
If (KeepAlive = 1)
{
return
}
ExitApp
BACKUP:
KeepAlive := 1 ;Script am Leben halten
;Notepad schließen (ohne Speichern)
Send, !db
Sleep, 50
Send, n
Sleep, 50
;Backupsteuerung:
GUI, -SysMenu
GUI, Color, C804080 ;gierige Farbe...
GUI, Font, S10 CFFFFFF Bold, Arial
GUI, Add, Text, x10 y10 w530 h20 +center, Notepad? - Ist tot! ICH lebe!
GUI, Add, Button, x175 y55 w200 h30, &Start
GUI, Add, Button, x175 y95 w200 h30, &Abbruch
GUI, Show, x440 y420 h150 w550, BEISPIEL: DATENSICHERUNG
Return
ButtonStart:
GUI, Destroy
SplashTextOn, 300, 30, %A_Space%, Bitte ein wenig Geduld...
WinMove, , , 550, 250
;
;Hier folgt der Code, ersatzweise nur ein Sleep
;
Sleep, 2000
SplashTextOff
ExitApp
ButtonAbbruch:
GUI, Destroy
ExitApp
|
Wenn's zu simpel für ein posting war: bitte keine Buuh-Rufe, bin soo sensibel!javascript:emoticon(' ')
Laughing
Gruß Methusalem |
|