Child kann nicht erstellt werden

[Brainstalker]

Hallo, ich habe ein Problem mit dem Erstellen eines Child in meiner MDI-Anwendung.

Ich benutze folgenden Code:

Delphi-Quellcode:

procedure TMainFrm.FormShow(Sender: TObject);
begin
  if MdiChildCount > 0 then begin
    ActiveMdiChild.Free;
    Application.ProcessMessages;
  end;

  if ParamCount > 0 then begin
    with TChildFrm.Create(self) do
    Open(ParamStr(1), true);
    WindowState := wsMaximized;
  end;

  Application.ProcessMessages;
end;

Den Fehler den er mir anzeigt:
Formular kann nicht erstellt werden. Zur Zeit sind keine MDI-Formulare aktiv.
Dabei zeigt er mir immer das with TChildFrm.Create(self) do an.
In einem anderen Programm benutze ich den gleichen Code und es funktioniert wunderbar. Vielleicht bin ich einfach zu blöd oder zu müde, den Fehler zu finden.

Würde mich über Hilfe freuen.