Loginform soll geschlossen werden bevor MainForm erscheint

[alzaimar]

Äh...Soll ich mich jedesmal einloggen, wenn das Hauptformular mal wieder sichtbar wird?
Wenn überhaupt, dann im OnActivate. Das ist dann besser.

Also: Nachdem hier alle wild durcheinander gepostet haben, ist das hier (99% Muetze) wohl das Einfachste:

Delphi-Quellcode:

Procedure MyMainForm.OnActivate (Sender : TObject);
Begin
  If Not LoginCorrect Then Application.Terminate;
End;

Wobei 'LoginCorrect' natürlich eine Funktion ist, die True liefert, wenn der Anwender sich korrekt eingeloggt hat und False, wenn nicht.