本帖最后由 qysir 于 2009-4-23 22:09 编辑
---------------源代码---------------------
#include <GuiConstantsEx.au3>
Dim $pzwj, $d[16], $rjmc, $rjsm, $i, $j, $k
GuiCreate("软件疯狂装", 600, 485)
GuiCtrlCreateTab(0, 70, 600, 372)
$pzwj = ("setup.ini")
for $j = 1 to 15
$d[$j] = IniRead($pzwj, "大类名称", $j, "没有")
if $d[$j] = "没有" then
else
GuiCtrlCreateTabItem($d[$j])
GuiCtrlCreateGroup("",5,86,140,350)
GuiCtrlCreateGroup("",142,86,450,350)
for $i = 1 to 150
$rjmc = IniRead($pzwj, $i, "名称", "没有")
$rjsm = IniRead($pzwj, $i, "说明", "该软件没有说明信息")
$k = ($i-($j-1)*10)*34
if -33 < $k > 339 then
Else
if $rjmc = "没有" then
Else
GuiCtrlCreateCheckbox($rjmc, 14, 66+$k)
GuiCtrlCreateLabel($rjsm, 151, 70+$k)
endif
endif
next
endif
next
GuiCtrlCreateTabItem("")
GuiSetState()
While GuiGetMsg() <> $GUI_EVENT_CLOSE
WEnd
-----------配置文件----------------
[大类名称]
1=第一页
2=第二页
3=第三页
4=第四页
5=第五页
6=第六页
7=第七页
8=第八页
9=第九页
10=第十页
[1]
页面=1
名称=winrar
文件=soft\winrar.exe
[2]
页面=1
名称=桌面路径设置
[3]
页面=1
名称=QQ2009
文件=soft\QQ2009.exe
[4]
页面=2
名称=office2003
[5]
页面=1
名称=安全卫士360
[6]
页面=1
名称=IE标题设置工具
[7]
页面=1
名称=桌面图标工具
[8]
页面=2
名称=设置hao123为主页
[9]
页面=1
名称=自动更改卷标
[10]
页面=2
名称=自定义开始菜单
[11]
页面=1
名称=语言选项
[12]
页面=1
名称=优化IDE设置(提速)
[13]
页面=1
名称=千千静听5.1
文件=ttpsetup.exe |