如何取得WINDOWS系统内在的所有图标，是否要用到系统图象别表，我现在只能有SHgetfileinfo函数得到系统图象列表的句柄

Question

不是告诉过你了吗？可以取得Windows文件系统的所有图标，但不是Windows系统的所有图标，就是说在资源管理其中的文件的类型的图标都可以取得到。

Answer 1

var
myhandle:thandle;
sfi:tshfileinfo;
begin
myhandle=shgetfileinfo('',0,sfi,sizeof(tshfileinfo),shgfi_sysiconindex or shgfi_largeicon);
imagelist1.handle:=myhandle;
imagelist1.shareimages:=true;
showmessage(inttostr(imagelist1.count));
end;
我得到的imagelist1.count结果总是5，为什么呢，大哥，我的代码错在哪里呀

Answer 2

我看到有些程序可以windows把系统的图标全部提取出来，怎么实现的呀，大哥

Answer 3

Windows的系统图标在一个动态库中,你从这个动态库中读不就可以
直到怎么读delphi自带一个例程