wenn das nicht tun sollte :
eine Datei z.B. mainicon.rc erstellenin der steht
MAINICON ICON irgendein.ico
und dann in der Project-
unit
Delphi-Quellcode:
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {Form1};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
das
{$R *.res}
durch
{$R 'Project1.res' 'mainicon.rc'}
ersetzen.