simpler zeitgesteuerter Process Killer

-ROUGE-

Anregungen gern gesehen

Immoment noch sehr simple. Denke es gibt da auch schon ne ganze Menge von, aber da ich keine Lust hatte zu suchen

Spoiler anzeigen

[autoit]

#cs
KillProcessLater v1b
by -ROUGE-
https://autoit.de/index.php?page…81252#post81252
#ce

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

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Include <GuiButton.au3>
#include <DateTimeConstants.au3>

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

#NoTrayIcon

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

Global $guititle = "KillProcessLater", $do_restart = 0, $do_shutdown = 0

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

$maingui = GUICreate($guititle, 265, 160, 270, 225, $WS_SYSMENU)
$time = GUICtrlCreateDate("", 170, 32, 75, 20, $DTS_TIMEFORMAT)
$lable = GUICtrlCreateLabel("Kill process after spezific time", 16, 11, 400, 17)
$combo = GUICtrlCreateCombo("Please choose!", 16, 32, 145, 25)
$exit = GUICtrlCreateButton("Exit", 15, 90, 50, 25, 0)
$killstart = GUICtrlCreateButton("Set Killer", 72, 90, 70, 25, 0)
$shutdown = GUICtrlCreateCheckbox("Shutdown", 16, 60, 65, 17)
$restart = GUICtrlCreateCheckbox("Restart", 87, 60, 57, 17)

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

$alltitles = ProcessList()

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

For $i = 1 to $alltitles[0][0]
GUICtrlSetData($combo, $alltitles[$i][0])
Next

GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
exit
Case $exit
exit
Case $killstart
$process = GUICtrlRead($combo)
$timetokill = StringSplit(GUICtrlRead($time), ":")

GUICtrlSetState($killstart, $GUI_DISABLE)
GUICtrlSetState($time, $GUI_DISABLE)
GUICtrlSetState($combo, $GUI_DISABLE)
GUICtrlSetState($restart, $GUI_DISABLE)
GUICtrlSetState($shutdown, $GUI_DISABLE)
_GUICtrlButton_SetText($killstart, "Enabled")
_GUICtrlButton_SetText($exit, "Stop")
While 1
$nMsg = GUIGetMsg()
If @HOUR = $timetokill[1] and @MIN = $timetokill[2] and @SEC = $timetokill[3] Then
If $do_restart = 1 Then Shutdown(2)
If $do_shutdown = 1 Then Shutdown(1)
ProcessClose($process)
Exitloop
ElseIf $nMsg = $exit Then
exitloop
ElseIf $nMsg = $GUI_EVENT_CLOSE Then
exit
EndIF
WEnd
GUICtrlSetState($killstart, $GUI_ENABLE)
GUICtrlSetState($time, $GUI_ENABLE)
GUICtrlSetState($combo, $GUI_ENABLE)
GUICtrlSetState($restart, $GUI_ENABLE)
GUICtrlSetState($shutdown, $GUI_ENABLE)
_GUICtrlButton_SetText($killstart, "Set Killer")
_GUICtrlButton_SetText($exit, "Exit")
Case $restart
If $do_restart = 0 Then
$do_restart = 1
GUICtrlSetState($shutdown, $GUI_UNCHECKED)
GUICtrlSetState($shutdown, $GUI_DISABLE)
Else
$do_restart = 0
GUICtrlSetState($shutdown, $GUI_ENABLE)
EndIf
Case $shutdown
If $do_shutdown = 0 Then
$do_shutdown = 1
GUICtrlSetState($restart, $GUI_UNCHECKED)
GUICtrlSetState($restart, $GUI_DISABLE)
Else
$do_shutdown = 0
GUICtrlSetState($restart, $GUI_ENABLE)
EndIf
EndSwitch
WEnd

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

v1b - 14.03.2009 - 18:16 Uhr
- Shutdown / Restart Checkboxen hinzugefügt

L3viathan

Anregung: Abbrechen-Button

-ROUGE-

Zitat von L3viathan2142

Anregung: Abbrechen-Button

Hab ich doch. Der Exit Button wird zum Stop Button wenn du mal genau hinguckst

L3viathan

:wacko: Erst gucken, dann posten, sorry.

Padmak

Ich würd auf jeden fall die Zeitabfrage anders machen.
Erst mal noch das hier rein,

[autoit]

GUICtrlSetData($hh,@HOUR)
GUICtrlSetData($mm, @MIN)
GUICtrlSetData($ss, @SEC)

[/autoit]

und ich würd mit TimerInit/Diff arbeiten, deines ist iwie... seltsam^^
Und etwas komisch zu handhaben

Padmak

Edit: Oder du änderst einfach den Text des labels von

[autoit]

$lable = GUICtrlCreateLabel("Kill process after specific time", 16, 11, 400, 17)

[/autoit]

zu

[autoit]

$lable = GUICtrlCreateLabel("Kill process at spezific time", 16, 11, 400, 17)

[/autoit]

L3viathan

Nein, ich kann schon verstehen, dass manch einer einen Prozess in 6 Minuten killen möchte, aber nicht nachrechnen möchte...
Andere Idee: Eine Zeitanzeige im Label, die aktualisiert wird. Ein zweites Label, das zunächst gleich ist. Ein Input, in dem standatmäßig 0 steht. Bei Veränderung des Inputs (bspw. zu 0:30:00) wird das zweite Label um 30 Minuten vwerschoben dargestellt.
Klingt ein bisschen konfus, ich hoffe du verstehst, was ich meine...^^

-ROUGE-

Zitat von Padmak

Ich würd auf jeden fall die Zeitabfrage anders machen.
Erst mal noch das hier rein,
[autoit]

GUICtrlSetData($hh,@HOUR)
GUICtrlSetData($mm, @MIN)
GUICtrlSetData($ss, @SEC)
[/autoit]

und ich würd mit TimerInit/Diff arbeiten, deines ist iwie... seltsam^^
Und etwas komisch zu handhaben

Padmak

Edit: Oder du änderst einfach den Text des labels von
[autoit]

$lable = GUICtrlCreateLabel("Kill process after specific time", 16, 11, 400, 17)
[/autoit]

zu
[autoit]

$lable = GUICtrlCreateLabel("Kill process at spezific time", 16, 11, 400, 17)
[/autoit]

Alles anzeigen

hehe ups

Najo ich bin ja noch Neuling auf dem Gebiet Auto-IT

Was genau meinst du bitte mit:

Zitat

und ich würd mit TimerInit/Diff arbeiten, deines ist iwie... seltsam^^

Ein Beispiel wär super

Zitat von L3viathan2142

Nein, ich kann schon verstehen, dass manch einer einen Prozess in 6 Minuten killen möchte, aber nicht nachrechnen möchte...
Andere Idee: Eine Zeitanzeige im Label, die aktualisiert wird. Ein zweites Label, das zunächst gleich ist. Ein Input, in dem standatmäßig 0 steht. Bei Veränderung des Inputs (bspw. zu 0:30:00) wird das zweite Label um 30 Minuten vwerschoben dargestellt.
Klingt ein bisschen konfus, ich hoffe du verstehst, was ich meine...^^

Jo, das machts übersichtlicher. Das versuch ich nachher mal einzubauen

**Oscar**

Für die Eingabe würde ich statt der drei Input-Felder lieber ein Date-Control benutzen:

[autoit]

#include <DateTimeConstants.au3>
#include <GUIConstantsEx.au3>

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

GUICreate("My GUI get time")
$hTime = GUICtrlCreateDate("", 20, 20, 90, 25, $DTS_TIMEFORMAT)
GUICtrlSetFont(-1, 12)
GUISetState()

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

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE

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

MsgBox(0, "Time", GUICtrlRead($hTime))

[/autoit]

Da hast Du zum Einen gleich ein Up-/Down-Control und zum Anderen kann man keine falschen Werte eingeben (spart das Error-Handling).

-ROUGE-

Zitat von Oscar

Für die Eingabe würde ich statt der drei Input-Felder lieber ein Date-Control benutzen:
[autoit]

#include <DateTimeConstants.au3>
#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]
GUICreate("My GUI get time")
$hTime = GUICtrlCreateDate("", 20, 20, 90, 25, $DTS_TIMEFORMAT)
GUICtrlSetFont(-1, 12)
GUISetState()
[/autoit] [autoit][/autoit] [autoit]
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
[/autoit] [autoit][/autoit] [autoit]
MsgBox(0, "Time", GUICtrlRead($hTime))
[/autoit]
Da hast Du zum Einen gleich ein Up-/Down-Control und zum Anderen kann man keine falschen Werte eingeben (spart das Error-Handling).

Alles anzeigen

Super Idee. Damit hatte ich noch nicht gearbeitet

Habs direkt mal eingefügt und angepasst. Siehe oben.

Gruß
rouge