Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi TForm schon offen? (https://www.delphipraxis.net/87193-tform-schon-offen.html)

delphinia 24. Feb 2007 19:27


TForm schon offen?
 
Der Titel sagt es schon ich möchte prüfen ob eine bestimmte TForm schon zu sehen (show) oder nicht

Nur sowas wie if
Delphi-Quellcode:
(Form1.show = true)
then gibt es nicht ;-(

Luckie 24. Feb 2007 19:36

Re: TForm schon offen?
 
Probier mal die Eigenschaft Visisble. Das setz aber vorraus, dass das Form-Objekt schon erzeugt wurde zu dem Zeitpunkt.

delphinia 24. Feb 2007 19:39

Re: TForm schon offen?
 
Das wars .-) super danki

delphinia 25. Feb 2007 00:59

Re: TForm schon offen?
 
hmm nun doch noch eine Frage . nach änderungen ergibt sich nun das Problem das ich eine Proezdure habe, die beim start (auch später) ausgeführt wird. zu Zeitpunkt des Startes ist die bestimmte Form noch nicht vorhanden. Dennoch muss ich irgendiwe den Fehler auffangen bei der obigen Möglichkeit oder aber eine ander Lösung finden
Hast Du noch eine Idee?

Martin K 25. Feb 2007 02:13

Re: TForm schon offen?
 
Ob eine Form (oder jedes andere Objekt) schon erzeugt wurde, kannst Du mit Delphi-Referenz durchsuchenAssigned() überprüfen.
Also am besten vor Deinen Code ein if Assigned(Form1) setzen :wink:
Somit wird dieser Code dann nur ausgeführt, wenn das Objekt auch tatsächlich schon erzeugt wurde.

Sunlight7 25. Feb 2007 02:27

Re: TForm schon offen?
 
Wobei man aber drauf achten muß den Pointer zu löschen, wenn man die Form frei gibt Delphi-Referenz durchsuchenFreeAndNil :!:

delphinia 25. Feb 2007 02:50

Re: TForm schon offen?
 
super danke nun bin ich versorgt ;-)


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:22 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz