Danke sehr : )
es hat trotzdem funktioniert !
Delphi-Quellcode:
{$R *.res}
procedure HideForms;
begin
// Form1.Hide;
// Form2.Hide;
Application.ShowMainForm := (ParamCount > 0) and
(Paramstr(1) = 'programhidden');
end;
// und so nicht :
Application.ShowMainForm := not ((ParamCount > 0) and
(Paramstr(1) = 'programhidden'));