[已解决] 如何能读配置文件打开按钮???求助!
本帖最后由 bj17209 于 2012-8-8 15:43 编辑当读配置文件
[工作]
按钮=打开
一个按钮处于打开状态
当读配置文件
[工作]
按钮=关闭
一个按钮处于关闭或者禁用状态
谢谢各位了啊,帮帮忙啊 读配置文件可用IniRead()函数。
判断可用if。
设置按钮可用或不可用,可以用函数GUICtrlSetState(),状态$GUI_ENABLE为可用 、$GUI_DISABLE为不可用。 Local $Ini = @ScriptDir & '\test.ini'
If Not FileExists($Ini) Then FileWrite($Ini, '[工作]' & @CRLF & '按钮=关闭')
GUICreate('')
GUICtrlCreateButton('按钮', 100, 100, 150, 25)
GUICtrlSetState(-1, (IniRead($Ini, '工作', '按钮', '') = '关闭') * 64 + 64)
GUISetState()
While GUIGetMsg() <> -3
WEnd 小鸟路过,学习了。 #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 虫子樱桃
非常感谢啊,我到我的那里看看效果如何啊! afan
大哥,非常感谢了啊
页:
[1]