@moonwhaler: MuTzE
) seine Version ist aber doch ein klein wenig kürzer. Und auch gilt, das ich den Projektquelltext nicht so gerne anfasse. Da kommt dann Delphi ab und an doch durcheinander.
Die Version im OnCreate ist latürnich noch eleganter. Sagen wir:
MuTzE's Version mit meiner Anmerkung und MuTzE's abschließenden Kommentar ist optimal*, ergo:
Delphi-Quellcode:
Procedure TMyMainForm.OnCreate (Sender : TObject);
Begin
If Not LoginCorrect then Application.Terminate;
End;
* jedenfalls meine Meinung.