procedure nach Application.run

[Bomberbb]

So nun hab ich mal ne Frage, ob das richtig ist, was ich hier gemacht habe...
Ich will in Abhängigkeit von den Übergabeparametern eine anderes Formular als das Hauptformular Anzeigen lassen und hab das jetzt so gelöst.

Delphi-Quellcode:

//dpr
  Application.Initialize;
  Application.CreateForm(THauptform, Hauptform);
  if (AnsiStrLiComp(PChar(ParamStr(1)),'open',4)=0) then
    Application.ShowMainForm := false;  //Hauptformular nicht anzeigen
  PostMessage(Hauptform.Handle, $0433, 0, 0); //Benutzerdefinierte Message an Hauptformular senden 
  Application.Run;

//Hauptform
procedure THauptform.WndProc(var Msg: TMessage);
begin
  case Msg.Msg of
    $0433: 
      begin //soll auf jeden Fall nach Application.Run laufen
        NebenForm:= TNebenForm.Create(Self);
        NebenForm.NachFormCreate(Self);
        NebenForm.ShowModal;
      end;
  end;
  inherited;
end;

Gibt es da noch eine einfachere Lösung? Gibt es eine Procedure, die auf jeden Fall nach Application.run ausgeführt wird?

Gruß

BBB