我正在使用此代码获取
shell图标(
Windows资源管理器中显示的图标).
有没有人有更快获取这些图标的经验？ SHGetFileInfo看起来很慢.
有没有人有更快获取这些图标的经验？ SHGetFileInfo看起来很慢.
procedure TForm2.Button1Click(Sender: TObject);
var
FileInfo: TSHFileInfo;
begin
FillChar(FileInfo,SizeOf(FileInfo),0);
if SHGetFileInfo(PChar('c:\windows\'),FileInfo,SHGFI_ICON or SHGFI_SMALLICON or SHGFI_SYSICONINDEX) <> 0 then
DrawIconEx(Canvas.Handle,10,FileInfo.hIcon,16,DI_IMAGE or
DI_MASK);
end;
谢谢！
尝试使用SHGFI_USEFILEATTRIBUTES标志.有关更多信息,请参阅文章
原文链接：https://www.f2er.com/windows/364491.htmlTuning SHGetFileInfo for Optimum Performance和
What does SHGFI_USEFILEATTRIBUTES mean?.
