Delphi-PRAXiS
Seite 2 von 2     12   

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 Noob-Frage: Forms bei laufzeit Öffnen / schließen (https://www.delphipraxis.net/31132-noob-frage-forms-bei-laufzeit-oeffnen-schliessen.html)

Meta777 4. Okt 2004 22:33

Re: Noob-Frage: Forms bei laufzeit Öffnen / schließen
 
Huhu,

bastle einfach deine Forms in der IDE und speichere die dann.



in Form_startmenu.Button1.Click:
Delphi-Quellcode:
if (Form_Map1 = nil) then begin //prüfen ob das form bereits erstellt ist...
  Form_Map1 := TForm_Map1.Create(nil);
end;
Form_Map1.Show;
Form_Startmenu.Close;
in Form_Map1.Button2.Click:
Delphi-Quellcode:
if (Form_Startmenu = nil) then begin
  Form_Startmenu := TForm_Startmenu.Create(nil);
end;
Form_Startmenu.Show;
Form_Map1.Close;
Das "main"-form (Unter "Projekt" -> "Optionen" -> "Formulare" -> "Hauptformular") solltes du allerdings nicht schließen - das beendet die anwendung wie schon erwähnt.

hth

be blessed

Shadowsong 4. Okt 2004 22:50

Re: Noob-Frage: Forms bei laufzeit Öffnen / schließen
 
JAWOLL !!

danke Meta777 !!!

dein code funktioniert perfekt!!!

genau das hab ich gesucht !!


- FRAGE ERLEDIGT -

:bounce2: :cheers: :thumb: :mrgreen: :coder2: :spin2: :coder:

-NIP- 6. Okt 2004 18:32

Re: Noob-Frage: Forms bei laufzeit Öffnen / schließen
 
Zitat:

Zitat von Shadowsong
Zitat:

ins Form.Show Ereignis eintragen.
warum ins Form.Show eintragen?



naja danke schonmal für die beiden befehle ^^

aber damit zeigt/versteckt man doch einfahc nur bereits createte forms oder?

am besten ich hätte befehle mit denen ich forms create und komplett schließe damit immer nur 1 offen ist und nich 10 stück versteckt im hintergrund

ich hab mich ein bisschen vertan,sorry, ich war schon müde.

-NIP-


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:43 Uhr.
Seite 2 von 2     12   

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