jybb001 发表于 2009-12-2 14:22:44

帮忙看看这个为什么窗体会闪一下就消失-

本帖最后由 jybb001 于 2009-12-3 21:57 编辑

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <Array.au3>
#Region ### START Koda GUI section ### Form=
Dim $Checkbox
$Form1 = GUICreate("test", 698, 500 )
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&1,""),40, 88, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&2,""),200, 88, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&3,""),360, 88, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&4,""),520, 88, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&5,""),40, 120, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&6,""),200, 120, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&7,""),360, 120, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&8,""),520, 120, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&9,""),40, 152, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&10,""),200, 152, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&11,""),360, 152, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&12,""),520, 152, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&13,""),40, 184, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&14,""),200, 184, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&15,""),360, 184, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&16,""),520, 184, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&17,""),40, 216, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&18,""),200, 216, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&19,""),360, 216, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&20,""),520, 216, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&21,""),40, 248, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&22,""),200, 248, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&23,""),360, 248, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&24,""),520, 248, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&25,""),40, 280, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&26,""),200, 280, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&27,""),360, 280, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&28,""),520, 280, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&29,""),40, 312, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&30,""),200, 312, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&31,""),360, 312, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&32,""),520, 312, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&33,""),40, 344, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&34,""),200, 344, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&35,""),360, 344, 150, 17)
$Checkbox=GUICtrlCreateCheckbox(IniRead("cd5.ini","cd5","cd"&36,""),520, 344, 150, 17)
GUISetState(@SW_SHOW)
While 1
       
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit

        EndSwitch
WEnd[/code

131738 发表于 2009-12-2 19:35:03

GUICtrlCreateCheckbox 成功: 返回控件标识符(控件ID).
估计你是想把INI的值写入数组，但这样不行的！

fugq0fff 发表于 2009-12-2 20:03:16

我比较 菜以前好像 高过 现在忘记了郁闷

afan 发表于 2009-12-2 20:17:09

Dim $Checkbox 改成 Dim $Checkbox

jybb001 发表于 2009-12-3 11:32:50

解决了，谢谢大家帮忙，谢谢AFAN

yangfengoo 发表于 2010-10-8 17:27:34

{:face (288):}
页: [1]
查看完整版本: 帮忙看看这个为什么窗体会闪一下就消失-