求教，ListView控件里显示文件和文件夹，如何绑定系统图标？

leihenyx

我想做个类似资源管理器的东西，ListView里显示的文件和文件夹，不知道怎么绑定这些文件本身的默认图标，请指点，谢谢！

神码

类似资源管理器可以参考下面的源码
http://bbs.aardio.com/forum.php?mod=viewthread&tid=11160

listview添加图标很简单，首先获取系统图像列表并绑定到listview控件，代码如下：

//获取系统图标列表
import win.imageList;
shImageList = win.imageList.shell( 1/*_SHIL_SMALL*/  )
winform.listview.setImageList( shImageList,0/*_LVSIL_NORMAL*/ )

然后获取指定文件在系统图像列表中的索引，并添加到listview中就行了，例如：

//获取文件图标索引
import fsys.info;
var filename = io._exepath; //要显示图标的文件路径
var sfi = fsys.info.get(filename, 0x4000/*_SHGFI_SYSICONINDEX*/ | 0x200/*_SHGFI_DISPLAYNAME*/)

//显示图标
winform.listview.addItem( {
    text = sfi.szDisplayName;
    iImage = sfi.iIcon;
} )

下面是完整版示例：

1. import win.ui;
   
2. /*DSG{{*/
   
3. var winform = ..win.form(text="listview显示图标";right=349;bottom=249)
   
4. winform.add(
   
5. listview={cls="listview";left=9;top=11;right=338;bottom=237;edge=1;mode="icon";z=1}
   
6. )
   
7. /*}}*/
   
8. 
   
9. //获取系统图标列表
   
10. import win.imageList;
    
11. shImageList = win.imageList.shell( 0/*_SHIL_LARGE*/  )
    
12. winform.listview.setImageList( shImageList,0/*_LVSIL_NORMAL*/ )
    
13. 
    
14. //获取文件图标索引
    
15. import fsys.info;
    
16. var filename = io._exepath; //要显示图标的文件路径
    
17. var sfi = fsys.info.get(filename, 0x4000/*_SHGFI_SYSICONINDEX*/ | 0x200/*_SHGFI_DISPLAYNAME*/)
    
18. 
    
19. //显示图标
    
20. winform.listview.addItem( {
    
21.         text = sfi.szDisplayName;
    
22.         iImage = sfi.iIcon;
    
23. } )
    
24. 
    
25. winform.show();
    
26. win.loopMessage();
    

复制代码

leihenyx

太给力了，多谢！！！