Application.Icon aus Resource laden

[sakura]

Gezeigt von sx2008 im gleichnamigen Thread.

Der folgende Code liefert die Möglichkeit das ICON der Anwendung zur Laufzeit festlegen. Dazu muss dieses als Resource in das Programm einkompiliert werden.

Die RC-Datei

Code:

ICONFILE3   ICON   'somefile.ico'

Der Code zum Laden zur Laufzeit:

Delphi-Quellcode:

var 
  Res: TResourceStream; 
[...]
  Res := TResourceStream.Create(hInstance, 'ICONFILE3', RT_ICON); 
  try
    Application.Icon.LoadFromStream(Res); 
  finally
    Res.Free;
  end;

......

Stichwörter für Suche: Icon ICO Resource ResourceStream TResourceStream Laufzeit Run-time Runtime

[lbccaleb]

Oder wenn man das Icon per WinAPI laden möchte, kann man es so machen:

Zitat von sakura:

Die RC-Datei

Code:

ICONFILE3   ICON   'somefile.ico'

application.Icon.Handle := LoadIcon(hInstance, MAKEINTRESOURCE('ICONFILE3'));

[turboPASCAL]

Wenn man eine bestimmte Grösse des Icons laden möchte, zB.: zur Darstellung auf einem DC, ist
LoadImage eine gute Wahl, denn LoadIcon gibt meist die Standard-Grösse von
32x32 zurück sofern vorhanden.

Dazu gibt es bereits einen Code-Lib-Beitrag: siehe hier


[edit=fkerber]Für die Codelib aufbereitet. Mfg, fkerber[/edit]