Prüfen ob Form bereits existiert.

[pixfreak]

Moin,

vielleicht gehts ja so:

Delphi-Quellcode:

if Assigned(frm_Email) then
  from_Email.Show()
else
  frm_Email := TFrmEmail.Create(...);

Wichtig ist halt nur, dass Du in Deinem Hauptfenster in einer Methode wie Create durch frm_Email := nil dem Zeiger einen definierten Startwert gibst. Wenn Du den Zeiger immer vorher auf nil setzt, dann ist die Bedingung ja immer so gegeben.

Ach ja, bitte lass Dein Programm beim schließen des Fensters den Zeiger wieder auf nil setzen...


VG Pixfreak