整那么多图标干啥呀，不觉得太花了吗~
我最近吃素… 回复 17# afan
好看啦，花姑娘的一样，为什么都喜欢！ 我觉得想弄得花俏点的话应该向着网页制作看齐，这样工作就是写Html代码了，方便日后的多平台发展。
A
本帖最后由 卫和谐 于 2010-9-4 06:14 编辑最后的代码，结帖：Func all()
Local $x = 0, $xx
$ico = _GUIImageList_Create(24, 24, 5, 3) ;创建 ImageList 控件
For $i1 = 2 To $TypeNumber ;从2循环到总类别数量
$SubNumber = IniReadSection($Configfile, $Type[$i1] & ".list");读取分类数量
_GUICtrlListView_InsertGroup($Listview, -1, $i1, $Type[$i1], 1) ;插入组
;MsgBox("4096", "测试图标列表", $SubNumber)
For $i2 = 1 To $SubNumber;循环
$info1 = IniReadSection($Configfile, $SubNumber[$i2]);读取分类字段名
If Not FileExists(@ScriptDir & "\" & $info1) Then ContinueLoop
$xx = _GUIImageList_AddIcon($ico, @ScriptDir & "\" & $info1, 0, True);添加图标到图像列表
_GUICtrlListView_SetImageList($Listview, $ico, 1) ;分配图像列表到第一个列表框
_GUICtrlListView_SetImageList($Listview[$i1], $ico, 1) ;分配图像列表到控件
_GUICtrlListView_AddItem($Listview, $SubNumber[$i2], 0) ;添加项目到列表的末尾
_GUICtrlListView_AddItem($Listview[$i1], $SubNumber[$i2], 0)
$index = _GUICtrlListView_FindInText($Listview, $SubNumber[$i2]) ;搜索包含指定文本的项目
$index1 = _GUICtrlListView_FindInText($Listview[$i1], $SubNumber[$i2])
_GUICtrlListView_SetItemGroupID($Listview, $index, $i1) ;设置项目组 ID
_GUICtrlListView_AddSubItem($Listview, $index, @ScriptDir & "\" & $info1, 1)
_GUICtrlListView_AddSubItem($Listview[$i1], $index1, @ScriptDir & "\" & $info1, 1)
_GUICtrlListView_AddSubItem($Listview, $index, $info1, 2) ;添加子项
_GUICtrlListView_AddSubItem($Listview[$i1], $index1, $info1, 2)
_GUICtrlListView_SetItemImage($Listview, $x, $xx)
_GUICtrlListView_SetItemImage($Listview[$i1], $x, $xx);在AFAN的基础上加的一句
$x += 1
If $info1 = 1 Then
_GUICtrlListView_SetItemChecked($Listview, $index, True)
_GUICtrlListView_SetItemChecked($Listview[$i1], $index1, True)
EndIf
Next
Next
_GUICtrlListView_EnableGroupView($Listview) ;启用或禁用控件项目分组
EndFunc ;==>all 神的累！大项目啊！羡慕ing 各位老大，请问下，水纹波的代码是哪个的，还有LZ的那个修改的可以自动安装的，那个的图标有没有解决的
页:
1
[2]