关于列表框显示图标的问题[已解决]

卫和谐

已经解决了,是后面少了一个语句!我再看看!

afan

回复 16# 卫和谐


    整那么多图标干啥呀，不觉得太花了吗~
我最近吃素…

卫和谐

回复 17# afan


    好看啦，花姑娘的一样，为什么都喜欢！

republican

我觉得想弄得花俏点的话应该向着网页制作看齐，这样工作就是写Html代码了，方便日后的多平台发展。

卫和谐

最后的代码，结帖：

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][1] & ".list");读取分类数量
                _GUICtrlListView_InsertGroup($Listview[1], -1, $i1, $Type[$i1][1], 1) ;插入组
                ;MsgBox("4096", "测试图标列表", $SubNumber[0][0])
                For $i2 = 1 To $SubNumber[0][0];循环
                        $info1 = IniReadSection($Configfile, $SubNumber[$i2][1]);读取分类字段名
                        If Not FileExists(@ScriptDir & "" & $info1[4][1]) Then ContinueLoop
                        $xx = _GUIImageList_AddIcon($ico, @ScriptDir & "" & $info1[4][1], 0, True);添加图标到图像列表
                        _GUICtrlListView_SetImageList($Listview[1], $ico, 1) ;分配图像列表到第一个列表框
                        _GUICtrlListView_SetImageList($Listview[$i1], $ico, 1) ;分配图像列表到控件
                        _GUICtrlListView_AddItem($Listview[1], $SubNumber[$i2][1], 0) ;添加项目到列表的末尾
                        _GUICtrlListView_AddItem($Listview[$i1], $SubNumber[$i2][1], 0)
                        $index = _GUICtrlListView_FindInText($Listview[1], $SubNumber[$i2][1]) ;搜索包含指定文本的项目
                        $index1 = _GUICtrlListView_FindInText($Listview[$i1], $SubNumber[$i2][1])
                        _GUICtrlListView_SetItemGroupID($Listview[1], $index, $i1) ;设置项目组 ID
                        _GUICtrlListView_AddSubItem($Listview[1], $index, @ScriptDir & "" & $info1[4][1], 1)
                        _GUICtrlListView_AddSubItem($Listview[$i1], $index1, @ScriptDir & "" & $info1[4][1], 1)
                        _GUICtrlListView_AddSubItem($Listview[1], $index, $info1[5][1], 2) ;添加子项
                        _GUICtrlListView_AddSubItem($Listview[$i1], $index1, $info1[5][1], 2)
                        _GUICtrlListView_SetItemImage($Listview[1], $x, $xx)
 _GUICtrlListView_SetItemImage($Listview[$i1], $x, $xx)  ;在AFAN的基础上加的一句
                        $x += 1
                        If $info1[2][1] = 1 Then
                                _GUICtrlListView_SetItemChecked($Listview[1], $index, True)
                                _GUICtrlListView_SetItemChecked($Listview[$i1], $index1, True)
                        EndIf
                Next
        Next
        _GUICtrlListView_EnableGroupView($Listview[1]) ;启用或禁用控件项目分组
EndFunc   ;==>all

yarsye

神的累！大项目啊！羡慕ing

stock128

各位老大，请问下，水纹波的代码是哪个的，还有LZ的那个修改的可以自动安装的，那个的图标有没有解决的