#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
PrepIni()
Opt("GUIOnEventMode", 1)
$Test = GUICreate("测试", 368, 208, 192, 124)
$Btn = GUICtrlCreateButton("按钮状态", 40, 24, 235, 113)
GUISetState(@SW_SHOW)
GetStaus()
GUISetOnEvent($GUI_EVENT_CLOSE,'QuitTool')
While 1
Sleep(100)
WEnd
Func QuitTool()
Exit
EndFunc
Func PrepIni()
If Not FileExists(@ScriptDir&'\Status.ini') Then
Local $Fhadle = FileOpen(@ScriptDir&'\Status.ini',1+8)
FileWrite($Fhadle,'[工作]'&@LF&'按钮=关闭')
FileClose($Fhadle)
EndIf
EndFunc
Func GetStaus()
Switch IniRead(@ScriptDir&'\Status.ini','工作','按钮','')
Case "打开"
GUICtrlSetData($Btn,'按钮状态:打开')
GUICtrlSetState($Btn,$GUI_ENABLE)
Case "关闭"
GUICtrlSetData($Btn,'按钮状态:关闭')
GUICtrlSetState($Btn,$GUI_DiSABLE)
EndSwitch
EndFunc
|