z.B. So oder eine Konsolenanwendung, oder oder oder
Delphi-Quellcode:
Program Project1;
Uses Forms,
SysUtils,
Unit1 in 'Unit1.pas' {Form1};
{$R *.res}
Begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
If Not SameText( ParamStr( 1 ), '/NoGui' ) Then Begin
Application.Run;
End Else Begin
// Mach halt was anderes...
End;
end.
Vorher aber nachschaun ob es überhaupt Parameter gibt, Code is nur mal so OnTheFly...
Bye Chritian