找回密码
 加入
搜索
查看: 1829|回复: 5

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

  [复制链接]
发表于 2009-12-2 14:22:44 | 显示全部楼层 |阅读模式
本帖最后由 jybb001 于 2009-12-3 21:57 编辑

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

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
发表于 2009-12-2 19:35:03 | 显示全部楼层
GUICtrlCreateCheckbox 成功: 返回控件标识符(控件ID).
估计你是想把INI的值写入数组,但这样不行的!
发表于 2009-12-2 20:03:16 | 显示全部楼层
我比较 菜  以前好像 高过 现在忘记了  郁闷
发表于 2009-12-2 20:17:09 | 显示全部楼层
Dim $Checkbox[36] 改成 Dim $Checkbox[37]
 楼主| 发表于 2009-12-3 11:32:50 | 显示全部楼层
解决了,谢谢大家帮忙,谢谢AFAN
发表于 2010-10-8 17:27:34 | 显示全部楼层
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-10-3 04:37 , Processed in 0.078148 second(s), 20 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表