Forum: Win32/Win64 API (native code)
Delphi
by bitsetter,
17. Feb 2007
Schön, dass es bei dir funktioniert, ich werde heute nochmal sehen, ob man da was machen kann. Auf jeden Fall enthält ein Icon ja normalerweise keine Ressourcen, daher wird es nicht funktionieren.
EDIT: Jetzt habe ich noch ein Programm, dass feststellen kann ob in ".ico" Dateien Icone mit einer Auflösung von 48X48 (und auch andere Auflösungen) enthalten sind. Bei den von mir getesteten Iconen,...
Forum: Win32/Win64 API (native code)
Delphi
by bitsetter,
17. Feb 2007
Moin,
mein Programm habe ich jetzt fertiggestellt, also dei den Dateien die ich getestet habe, hat es funktioniert. Kannst ja mal testen ob es zu gebrauchen ist.
EDIT: einen Fehler behoben
Forum: Win32/Win64 API (native code)
Delphi
by bitsetter,
16. Feb 2007
Jetzt verstehe ich auch erst, was du eigentlich erreichen möchtest.
Du kannst ja mal Halo mit dem Programm Resource Hacker öffnen, und du wirst sehen, dass Halo auch 3 Icone von 48X48 in verschiedenen Farbtiefen besitzt. Auf meinem Bild kannst du sehen, dass Icon Nr. 9 also das Richtige für dich gewesen wäre.
Eine Möglichkeit wäre, wenn du deine Icone als Bilder aus der Resource...
Forum: Win32/Win64 API (native code)
Delphi
by bitsetter,
15. Feb 2007
Ich weis aber nicht, ob folgenes immer funktioniert.
procedure TForm1.Button1Click(Sender: TObject);
var
Icon : TIcon;
begin
Icon:= TIcon.Create;
try
if OpenPictureDialog1.Execute then
begin