Thema: Delphi TForm Freigeben

Einzelnen Beitrag anzeigen

Pro_RJ

Registriert seit: 16. Apr 2008
146 Beiträge
 
#32

Re: TForm Freigeben

  Alt 5. Sep 2008, 09:03
Also ich habs jetzt mal bei mir Implementiert:
Ich habe
1. Alle Referenzen (Form1 : TForm1) rausgeschmissen.
2. eine Objectlist erstellt wo ich im Constructor von TMeinForm das neu erzeugte Fenster eintrage und im Destuctor aus dieser Liste wieder rausschmeiße.
3. Jedes DFenster hat eine eindeutige Nummer bekommen, welche ich in dem Object Speichere.
4. Es gibt nur noch eine Function, die mir an Hand der FensterNr das Object oder Nil zurück gibt.
damit ist sichergestellt das keinerlei Referenzen hängen bleiben können.
Einziger nachteil, Wenn ich auf Form1 zugreifen will muss ich jetzt immer TForm1(Fenster(123)) schreiben aber das ist ok.
  Mit Zitat antworten Zitat