如何取得文件的图标？

[bestext]

我用ListView控件模仿Windows文件夹的时候，遇到一个问题：Windows在显示文件的时候，不同的扩展名对应不同的图标。这个图标的位置好象是存放在注册表里面，如何取得某个扩展名对应的图标？谢谢。

[peng_hui]

用API函数：SHGetFileInfo就可以了。

[ReganCai]

我记得用API:ExtractIcon,
定义：Public Declare Function ExtractIcon Lib "shell32.dll" Alias "ExtractIconA" (ByVal hInst As Long, ByVal lpszExeFileName As String, ByVal nIconIndex As Long) As Long；
可以把exe,dll等文件中的所有icon都取出来。

[Mike_sun]

api 了

[Wingsun]

使用ShGetFileInfo,返回ImageList的Handle,将这个ListView的Images的Handle指向这个之就可以了，我使用BCB实现如下：
THandle ImageList;
SHFILEINFO * FileInfo=new SHFILEINFO();
ImageList=SHGetFileInfo("C:\\",0,FileInfo,sizeof(SHFILEINFO),SHGFI_SYSICONINDEX | SHGFI_SMALLICON);
SendMessage(lstvwOriginalFiles->Handle,LVM_SETIMAGELIST,LVSIL_SMALL,ImageList);
ImageList=SHGetFileInfo("C:\\",0,FileInfo,sizeof(SHFILEINFO),SHGFI_SYSICONINDEX | SHGFI_LARGEICON);
SendMessage(lstvwOriginalFiles->Handle,LVM_SETIMAGELIST,LVSIL_NORMAL,ImageList);
delete FileInfo;