Einzelnen Beitrag anzeigen

Benutzerbild von RavenIV
RavenIV

Registriert seit: 12. Jan 2005
Ort: Waldshut-Tiengen
2.875 Beiträge
 
Delphi 2007 Enterprise
 
#8

Re: Weitere Fenster geöffnet?

  Alt 17. Dez 2007, 12:18
Also ich habe eigene Prozeduren dafür in meiner Hauptform.

RegisterClient(aForm:TForm) und UnregisterClient(aForm: TForm)
Diese fügen das Form in eine TList ein bzw. entfernen sie wieder.
im FormCreate bzw. FormClose der UnterFormulare rufe ich diese Prozeduren auf.

Beim Schliessen der Hauptform prüfe ich, ob in der Liste noch ein Eintrag drin ist und reagiere entsprechend.
if fFensterListe.Count <> 0 then
Klaus E.
Linux - das längste Text-Adventure aller Zeiten...
Wer nie Linux mit dem vi konfiguriert hat, der hat am Leben vorbei geklickt.
  Mit Zitat antworten Zitat