![]() |
@Stanlay: Ja die Welt ist nun mal ungerecht. :(
|
Jaja, da hast du recht....Ich hab nur die SSL Version von D7 Pro :(
Aber um noch mal auf das Problem zu sprechen zu kommen. Wenn man das so mit den Panels macht, dann verändert man doch nur den Fenster Inhalt, und wechselt nicht zu einem anderen Fenster. |
Jein. Im Prinzip kann man auch die Menüs, Icon-Leisten und StatusBar übernehmen bzw. mergen. Ich finde dies wesentlich angenehmer zum Arbeiten als den Fenster-Wechsel. Aber das ist wohl Geschmackssache.
|
Nicht nur Geschmackssache. Ich finde (also doch geschmack...hmmm :mrgreen:), dass z.B. ab und zu eigene Fenster wirklich nötig sind. Z.B. die ganzen Dialoge und so (Schriftarten, Drucken, Öffnen, Speichern) oder ein Optionenfenster.
|
hm ja enterprise hab ich "billig" über einen freund beim vertrieb beim PC Großhandel bekommen. aber egal...
Ne das mit dem umschalten is krass. Teoretisch läuft bei dem Programm alles über die Leere Form3 wo dann einfach 1 udn 2 rüber geladen wird. ich denk ich kann das gleich mal bei meinem Verwaltungsprogramm umändern. RIESEN THX nochmal |
Zitat:
|
Zitat:
|
hm ich habs gerade implementiert und bekomme jetzt immer einen
Stack-Überlauf |
Poste doch mal deinen Code.
|
Das wechseln von Unit1 zu Unit2 läuft von Unit2 zu 1 kommt dann der fehler
Unit1 wo was drin is
Delphi-Quellcode:
Unit2 wo was drin is
procedure TForm1.BitBtn1Click(Sender: TObject);
begin if Form7.pMain.ControlCount = 1 then Form7.pMain.Controls[0].Parent := TWinControl (Form7.pMain.Controls[0].Owner); Form2.pMain.Parent := pMain; Form7.Caption := Form1.Caption; end;
Delphi-Quellcode:
Leer Unit7
procedure TForm2.BitBtn4Click(Sender: TObject);
begin if Form7.pMain.ControlCount = 1 then Form7.pMain.Controls[0].Parent := TWinControl (Form7.pMain.Controls[0].Owner); Form1.pMain.Parent := pMain; Form7.Caption := Form1.Caption; closefile(pf); end;
Delphi-Quellcode:
Fehler wird angezeigt hier
procedure TForm7.FormShow(Sender: TObject);
begin if Form7.pMain.ControlCount = 1 then Form7.pMain.Controls[0].Parent := TWinControl (Form7.pMain.Controls[0].Owner); Form1.pMain.Parent := pMain; Form7.Caption := Form1.Caption; end;
Delphi-Quellcode:
[edit=Daniel B]Center-Tags in Delphi-Tags umgewandelt. Wer macht denn sowas? :roll: :mrgreen: MfG Daniel B.[/edit]
begin
Application.Initialize; Application.CreateForm(TForm1, Form1); Application.CreateForm(TForm2, Form2); Application.CreateForm(TForm4, Form4); Application.CreateForm(TForm6, Form6); Application.CreateForm(TForm5, Form5); Application.CreateForm(TForm7, Form7); Application.Run; end. //--HIER DER FEHLER STackÜberlauf |
Alle Zeitangaben in WEZ +1. Es ist jetzt 14:28 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