ProcessClose 1.0

;By Sym98
;Versione 1.0
#include <guiconstants.au3>
$count = 5
$File = @ScriptName
$Form1 = GUICreate("ProcessClose 1.0 - By Sym98", 304, 329, 497, 125)
GUISetIcon("icon.ico")
GUISetFont(10, 800, 0, "Comic Sans MS")
GUISetBkColor(0xFFFFFF)
$Label1 = GUICtrlCreateLabel("Processo da chiudere:", 16, 23, 144, 23)
$Process = GUICtrlCreateInput("", 168, 32, 97, 27)
GUICtrlSetBkColor(-1, 0x808080)
$Start = GUICtrlCreateButton("Start", 16, 63, 129, 49, 0)
GUICtrlSetColor(-1, 0x008000)
$Pic1 = GUICtrlCreatePic("C:\Users\Sym98\Pictures\imagesCAJNVX6N.jpg", 0, 127, 321, 201)
$Stop = GUICtrlCreateButton("Stop", 168, 63, 121, 49, 0)
GUICtrlSetColor(-1, 0x008000)
GUISetState(@SW_SHOW)


While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Start
If GUICtrlRead($Process) = "" Then
MsgBox (16,"ProcessClose", "Specifica il nome del processo da chiudere!")
Run ($File)
ShellExecute($File) ;Se compili questo file, elimina la riga corrente..
Exit
Else
MsgBox(0, "ProcessClose", "Ok")
$count = 1
EndIf
Case $Stop
$count = 0
EndSwitch
If $count = 1 Then
If ProcessExists (GUICtrlRead($Process)) Then ProcessClose (GUICtrlRead($Process))
EndIf
WEnd