Icons in Echtfarben

Computer: Software & Programmierung Delphi & Pascal
#1

Hallo Experten,

wie kann ich mit Delphi ohne viel „Gezaubere“ Icons extrahieren bzw. erstellen, die mehr als nur 16 Farben haben? Optimal wären Icons mit 256 oder mehr Farben.

Also mein Code:
{Extrahiert aus einer Datei die enthaltenen Icons}
{SaveFile ist ein TSaveDialog, LoadFile ist ein TOpenDialog}

var
ICO: TIcon;
I: Integer;
begin
ICO := TIcon.Create;
I := SpinEdit1.Value;
ICO.Handle := ExtractIcon(Handle, PChar(LoadFile.FileName), I);
ICO.SaveToFile(SaveFile.FileName);

ICO.Free;
end;

Danke schonmal,
Christoph

#2

Hallo Experten,

wie kann ich mit Delphi ohne viel „Gezaubere“ Icons
extrahieren bzw. erstellen, die mehr als nur 16 Farben haben?
Optimal wären Icons mit 256 oder mehr Farben.

Die Icondarstellung hängt von der eingestellten Farbtiefe ab - und ob die Resource verschiedene Icons in verschiedenen Farben enthalten ist. Wenn dort z.b. nur Icons mit 16 Farben drinne sind, kann er auch nur diese extrahieren. Schau dir mal mit einem Resourceneditor die Windows-Icons ab. In verschiedenen Größen und Farbtiefen sind die meisten abgelegt.

P.S. ich würde ExtractIconEx() benutzen, da dann auch die Icons mit verschiedenen Größen zurückgegeben werden und alle auf einen Schlag. (siehe WinAPI Referenz).
grüsse
Mathias