Autor Beitrag
smdata2
Hält's aus hier
Beiträge: 4


Delphi 7, C++ (VC++ 2008 Express)
BeitragVerfasst: Fr 13.06.08 19:31 
Hallo Leute ich habe folgendes Problem:

Nachdem ich mich jetzt schon fast eine Stunde durch die Suchfunktion quäle und immer noch keine Lösung gefunden habe werde ich jetzt die Frage einfach nochmal stellen (sorry wenn sie wirklich vor kurzer Zeit schonmal gestellt wurde :oops: ) Und zwar habe ich ein Problem beim Formularwechsel. Wenn ich mit

ausblenden Delphi-Quelltext
1:
2:
Form2.Show;
Form1.Visible = False;


von einem Formular zum anderen wechsele ist ja alles schön und gut nur wenn ich die Anwendung bzw. das Formular über das Kreuz oben rechts beenden dann schließt sich nur die Form2 und das Programm selber läuft weiter. Da meine Form1 nur ein reines Login-Formular ist, wird es ja nach dem Login nicht mehr benötigt. Wie kann ich sozusagen das gesamte Programm mit Klick aufs Kreuz schlißen, da die Form2 mein eigentliches Hauptformular ist?

Eine Möglichkeit die mir eingefallen ist, wäre die MainForm-Eigenschaft zu Form2 zu ändern und dann die Form1 zu zeigen und die Form2 zu verstecken (bei Programmstart halt), aber ich denke, es gibt sicherlich noch eine andere Möglichkeit dieses Problem zu lösen oder? :roll:

Wäre zumindest sehr nett, wenn jemand dazu mal ein Statement abgeben würde!
MfG smdata2

EDIT: Also ich habe das mit dem Ändern der MainForm mal ausprobiert, bekomme allerdings einen AccessViolation Error ... Jetzt bin ich total verwirrt :shock:

Moderiert von user profile iconNarses: Color-Tag nur auf das EDIT begrenzt
MDX
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 595
Erhaltene Danke: 4

Windows 8.1, Linux Debian 8, Android Lollipop
Delphi, PHP, Java (Android)
BeitragVerfasst: Fr 13.06.08 20:05 
mACHS DOCH SO.



ausblenden Delphi-Quelltext
1:
2:
3:
4:
procedure TForm2.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
Application.Terminate;
end;


und beim ausblenden würde ich:

ausblenden Delphi-Quelltext
1:
Form1.Hide;					


Machen :wink:


Zuletzt bearbeitet von MDX am Fr 13.06.08 20:54, insgesamt 1-mal bearbeitet
smdata2 Threadstarter
Hält's aus hier
Beiträge: 4


Delphi 7, C++ (VC++ 2008 Express)
BeitragVerfasst: Fr 13.06.08 20:29 
ok das klingt schon mal plausibel ... nur wie füge ich diese CanClose-Prozedur ein?
Soll die in die Unit2.pas oder in die Unit1.pas?

mfg
MDX
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 595
Erhaltene Danke: 4

Windows 8.1, Linux Debian 8, Android Lollipop
Delphi, PHP, Java (Android)
BeitragVerfasst: Fr 13.06.08 20:38 
Du willst ja die Form 2 über das X Schließen, oder?

Also: Form 2 auswählen->Objektinspektor->Ereignisse->CanClose Doppelklicken->Code einfügen->Fertig :wink: :wink:

Müsste klappen!

Edit: Bevor ichs Vergesse: :welcome: im DF :wink:
smdata2 Threadstarter
Hält's aus hier
Beiträge: 4


Delphi 7, C++ (VC++ 2008 Express)
BeitragVerfasst: Fr 13.06.08 20:40 
user profile icondavid-kurz hat folgendes geschrieben:

Also: Form 2 auswählen->Objektinspektor->Ereignisse->CanClose Doppelklicken->Code einfügen->Fertig :wink: :wink:


da is kein canclose ;) nur nen onclose-event
nur zur info: ich benutze delphi 7

danke danke ^^

BIG EDIT: Ja es war das OnClose-Event ^^ Man stand ich aufm Schlauch ... danke für deine Hilfe ;)
MDX
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 595
Erhaltene Danke: 4

Windows 8.1, Linux Debian 8, Android Lollipop
Delphi, PHP, Java (Android)
BeitragVerfasst: Fr 13.06.08 20:54 
user profile iconsmdata2 hat folgendes geschrieben:
user profile icondavid-kurz hat folgendes geschrieben:

Also: Form 2 auswählen->Objektinspektor->Ereignisse->CanClose Doppelklicken->Code einfügen->Fertig :wink: :wink:


da is kein canclose ;) nur nen onclose-event
nur zur info: ich benutze delphi 7

danke danke ^^

BIG EDIT: Ja es war das OnClose-Event ^^ Man stand ich aufm Schlauch ... danke für deine Hilfe ;)


Uups... :oops: :oops: :oops:


Habe ich wohl was falshc beschrieben, meinte eigentlich:

ausblenden Delphi-Quelltext
1:
2:
3:
4:
procedure TForm2.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
Application.Terminate;
end;


Sry..... :roll: :roll:


Naja, ist ja trotzdem gelöst :wink: