AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Form1 aus Form2 schluießen

Ein Thema von BAMatze · begonnen am 5. Mär 2009 · letzter Beitrag vom 23. Mai 2009
 
Dipl Phys Ernst Winter

Registriert seit: 14. Apr 2009
Ort: Jena
103 Beiträge
 
Delphi 3 Professional
 
#17

Re: Form1 aus Form2 schluießen

  Alt 23. Mai 2009, 16:02
Versuchts doch einmal ganz einfach:
Das Hauptformular exportiert eine logische Variable
isAborted: boolean; Form2 wird geöffnet mit
Delphi-Quellcode:
procedure TForm1.btnForm2ShowClick(Sender: TObject);
begin
  Form2.ShowModal;
  if isAborted then Close
end;
Zum Schließen von Form2 gibt es die Buttons btnClose und btnAbort
Delphi-Quellcode:
procedure TForm2.btnCloseClick(Sender: TObject); // Form2 schließen
begin
  isAborted:= false; Close
end;

procedure TForm2.btnAbortClick(Sender: TObject); // Programm beenden
begin
  isAborted:= true; Close
end;
die dem Hauptprogramm mit isAborted übermitteln, ob das Programm beendet werden soll oder nicht.

Mit ModalResult kann man's eleganter ausdrücken, es ist dann aber nicht mehr so einfach zu überblicken.
Angehängte Dateien
Dateityp: zip form2abort_194.zip (105,7 KB, 0x aufgerufen)
Autor: DP Ernst Winter
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:22 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz