Du erstellst ein Icon:
Delphi-Quellcode:
var TempIcon: TIcon;
begin
TempIcon := TIcon.Create;
TempIcon.Handle := ExtractIcon(HInstance ...
end;
Hinterher kannst du dann auf das Icon zugreifen.
Das speichern des Icons, geht aber wie immer nur mit 16 Farben. Ansonsten musst du mal nach der
Unit IconsToFile suchen.
[werbung]
So was hab ich auch mal gemacht:
ExtractIcon
[/werbung]
Florian