Die Formulare werden nacheinander erzeugt, d.h. Du kannst im OnCreate kein anderes (automatisch erzeugtes) Formular anzeigen, wenn dieses in der Erzeugungsreihenfolge danach kommt. Eine Lösung wäre, die Erstellungsreihenfolge der Formulare zu ändern, eine andere, das zweite Formular überhaupt nicht automatisch erzeugen zu lassen, sondern dies bei Bedarf selbst zu tun.
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var
frm: TFormRegistrierung;
begin
WindowState := wsMaximized;
strStartVerzeichnis := GetCurrentDir; //übergibt das Startverzeichnis;
if NOT (FileExists('C:\Reg.file')) then
begin
frm := TFormRegistrierung.Create(nil);
try
frm.ShowModal;
finally
frm.Free;
end;
end;
end;