Thema: Delphi Form bereits erzeugt?

Einzelnen Beitrag anzeigen

Tpercon

Registriert seit: 7. Jun 2002
638 Beiträge
 
Delphi 5 Professional
 
#6
  Alt 16. Jul 2002, 14:06
Frage Teil2:
Ich erzeuge im OnClick Ereignis eines MenuItem zur Laufzeit eine Form (FormStyle=fsStayOnTop) und zeige sie mit Show an bzw. möchte ich sie wieder freigeben, wenn sie vorhanden ist. Die Form kann aber auch normal übers x geschlossen werden. Im MainMenuOnChange möchte ich abfragen, ob die Form erstellt ist oder nicht und das MenuItem dann entsprechend checked:=true bzw. false anzeigen lassen. Wie mache ich das?
Mein Code des MenuItem:
Code:
If not Assigned(Form6)
 then
  begin
   Form6:=TForm6.Create(Application);
   Form6.Show;
  end
 else Freeandnil(Form6);
MainMenu1Change:
Code:
If not Assigned(Form6)
 then Item1.Checked:=False
 else Item1.Checked:=True;
Form6OnDestroy:
???

Gruß
  Mit Zitat antworten Zitat