Tyleo-Dev-AutoIT-Oldies/NAG Leo/Supervision_Control.au3

35 lines
1.2 KiB
AutoIt
Raw Permalink Normal View History

2024-02-18 21:17:39 +00:00
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=SupervisionNAGLeo_stop.ico
#AutoIt3Wrapper_Outfile_x64=Releases\NAG_Stop.Exe
#AutoIt3Wrapper_Res_Comment=NAGLeo - Stop
#AutoIt3Wrapper_Res_Description=NAGLeo - Stop
#AutoIt3Wrapper_Res_Fileversion=1.0.0.1
#AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y
#AutoIt3Wrapper_Res_ProductName=NAGLeo - Stop
#AutoIt3Wrapper_Res_ProductVersion=1.0.0.0
#AutoIt3Wrapper_Res_CompanyName=Tyleo Softwares
#AutoIt3Wrapper_Res_LegalCopyright=Tyleo Softwares
#AutoIt3Wrapper_Res_LegalTradeMarks=Tyleo Softwares
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
Global $Form2 = GUICreate("", 169, 47, 302, 218)
Global $Button1 = GUICtrlCreateButton("STOP", 8, 8, 153, 33)
GUICtrlSetFont(-1, 20, 400, 0, "Segoe UI")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While ProcessExists("NAG.exe")
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
ProcessClose("NAG.exe")
Exit
Case $Button1
ProcessClose("NAG.exe")
EndSwitch
WEnd