Icons aus shell32.dll auslesen

[himitsu]

@runger
so wie ich das jetzt sehe, dann wird bei deinem Code doch das Handle auf shell32.dll garnicht verwendet, demnach könnte dann ja das Ganze mit LoadLibrary entfallen?

Delphi-Quellcode:

Function IconLesen(icon_nr_s : cardinal) : TIcon;
begin
  Result := TIcon.Create; 
  Result.Handle := ExtractIcon(application.handle,'c:\windows\system32\shell32.dll', icon_nr_s);
end;