Hi Leuts,
Ich will das Icon meiner Exe ändern.
Normalerweise macht man das ja über Projekt/Optionen/Anwendung/ und dann lade ich es da rein.
Mein Problem ist nur das ich die Res datei des Projektes andauernd löschen mus.
Ergo will ich es einbinden.
Mit
Delphi-Quellcode:
Program Project1;
{$R 'Icon.res' 'Icon.rc'} // Einbinden der Icon Ressource in "Icon.rc" steht der Index 1
Uses
Forms,
shellapi, // benötigt fürs laden des Icons
graphics, // benötigt fürs laden des Icons
Unit1 In 'Unit1.pas' {Form1};
{$R *.RES}
Var // benötigt fürs laden des Icons
Icon: TIcon; // benötigt fürs laden des Icons
Begin
Icon := TIcon.Create; // benötigt fürs laden des Icons
Try // benötigt fürs laden des Icons
Icon.Handle := ExtractIcon(hinstance, pchar(paramstr(0)), 1); // benötigt fürs laden des Icons
Application.Icon.Assign(Icon); // benötigt fürs laden des Icons
Finally // benötigt fürs laden des Icons
Icon.Free; // benötigt fürs laden des Icons
End; // benötigt fürs laden des Icons
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
End.
und der Ivon.rc
1 ICON DISCARDABLE "icon.ico"
Lädt meine Anwendung auch wunderbar das Icon.
Nur eben die Exe Datei ansich hat noch das Delphi Icon.
Wenn ich das Gleiche mit einer
NonVCL anwendung mache geht es aber.
Die frage ist nun was mus ich ändern das es in meinem
VCL Project auch geht ?