TForm in TForm?

[Teekeks]

Hi!
Ist es möglich eine Form in einer Form zu erzeugen?
Einfach eine Form zu erzeugen zur runtime und dann parent auf die andere Form zu setzen geht leider nicht.

Wie kann man das sonst machen, oder geht das gar nicht...

Gruß Teekeks

[khh]

Hi!
Ist es möglich eine Form in einer Form zu erzeugen?
Einfach eine Form zu erzeugen zur runtime und dann parent auf die andere Form zu setzen geht leider nicht.

Gruß Teekeks

was geht denn da nicht?
Fehlermeldungen?

[_X_]

Da zu gibts ja Frames.

mfg _X_

[arturx]

Hey Teekeks,
meinst Du etwas in der Art :

Code: Alles auswählen

TForm1 = class(TForm)
    Button1: TButton;
    Panel1: TPanel;
    procedure Button1Click(Sender: TObject);
  private
       vfo : tform;
       bt  : tbutton;     
  end; 
 
procedure TForm1.Button1Click(Sender: TObject);
begin  If assigned(vfo) then
          begin vfo.free;
                vfo := nil;
                exit;
          end;
        vfo         := tform.create(self);
        vfo.name    := 'hallo';
        vfo.parent  := self.Panel1;
        vfo.align   := alclient;
        vfo.Color   := clyellow;            //damit es auffällt
        bt          := tbutton.create(vfo{<--autom. destroy durch vfo});
        bt.Parent   := vfo;
        bt.SetBounds(10,10,60,20);
        bt.caption  := 'drück mich';
        vfo.visible := true; // <----- das scheint der Bringer zu sein !!!!
end;

Am Anfang verblüffte mich Deine Frage etwas, da der o.a. Code auf Anhieb funktionierte.
Doch als ich eine 2.Form per drag and drop zusammenclickte, funktionierte alles erst, nachdem im Code ebenfalls visible := true; stand.
Das muss offenbar eingefügt werden, auch wenn im OI visible schon gesetzt ist.
Natürlich müssen die Form bounds passen (hier einfach per alclient), damit das 2.Fenster sichtbar ist.
Ich hoffe, dass Dir das ein wenig weiter hilft..

[Teekeks]

Hmmm,
Naja, ich hätte ja gerne das ganze mit Rahmen (also Titelleiste mit Kreuz oben rechts etc.) also ganau wie ein normales Fenster.

[Hitman]

Stichwort: MDI. Aber wozu muss das Formular in deinem jetzigen Formular sein? Reicht es nicht modal oder gar non-modal als normaler Dialog?

[arturx]

ich hätte ja gerne das ganze mit Rahmen (also Titelleiste mit Kreuz oben rechts etc.) also ganau wie ein normales Fenster.

Na dann füg mal die folgenden Zeilen hinzu :

Code: Alles auswählen

vfo.BorderIcons:= [bihelp,bisystemmenu,biminimize,bimaximize];
vfo.BorderStyle:= bssizeable;

[Teekeks]

hmmm, ändert sich nichts... Könnte das an GTK2 liegen?

[arturx]

Könnte das an GTK2 liegen?

Tja, damit habe ich leider keine Erfahrung.....
Trozdem : was genau ist der Fehler :

Kommt überhaupt nichts ?
Kommt eine Fehlermeldung (wenn ja, welche) ?
Kommt etwas Falsches ?
Kommt .... ?

[Hitman]

Diese Umsetzung von MDI existiert nur unter Win32 und QT. Und soweit ich das beurteilen kann ist es in beiden mehr oder weniger "deprecated" - selbst Microsoft (die diese Art des MDI mehr oder weniger geprägt haben) nutzt es nicht mehr. Eventuell solltest du deine Benutzeroberfläche nochmal überdenken - es gibt sicher schönere Möglichkeiten (siehe Firefox, MS Office, .... jede erdenkliche Anwendung )

[Socke]

Diese Umsetzung von MDI existiert nur unter Win32 und QT. Und soweit ich das beurteilen kann ist es in beiden mehr oder weniger "deprecated" - selbst Microsoft (die diese Art des MDI mehr oder weniger geprägt haben) nutzt es nicht mehr. Eventuell solltest du deine Benutzeroberfläche nochmal überdenken - es gibt sicher schönere Möglichkeiten (siehe Firefox, MS Office, .... jede erdenkliche Anwendung )

Naja, MS Office und gute Benutzeroberfläche? Schonmal eine bestimmte Option, von der du nur weißt, dass es sie gibt, gesucht? Ich finde da nichts wieder ...
Ansonsten verwendet(e) Microsoft in MS Excel 2003 auch MDI. Ich hab mich zuerst immer gewundert, warum ich keine zwei Arbeitsmappen gleichzeitig anzeigen konnte ...

[Hitman]

Naja, MS Office und gute Benutzeroberfläche? Schonmal eine bestimmte Option, von der du nur weißt, dass es sie gibt, gesucht? Ich finde da nichts wieder ...

Wer hat was von "gut" gesagt? Außerdem ging es um MDI, nicht um die gesamte Benutzeroberfläche (wäre auch ziemlich irrelevant, wenn der OP nicht ausgerechnet eine eigene Office Suite schreiben will).

Ansonsten verwendet(e) Microsoft in MS Excel 2003 auch MDI. Ich hab mich zuerst immer gewundert, warum ich keine zwei Arbeitsmappen gleichzeitig anzeigen konnte ...

MDI (=Multi Document Interface) ist ein Konzept; dieses Fenster-in-Fenster eine konkrete (aber wie gesagt veraltete, unangebrachte und so gut wie nicht portable) Implementierung.

[Teekeks]

Hi!
Das ganze ist auch eigentlich kein momentanes Problem von mir, doch ich hatte das schon einmal gesehen und mich halt gefragt ob das den mit Lazarus möglich ist...

[pluto]

Ich meine, dass mal am Anfang ausprobiert zu haben. Da hat es Einbandfrei geklappt. Da habe ich einfach nur das Parent vom From geändert. Da ja beide ein Kompatible Klasse als Vorfahren habe. Daher erstaunt es mich das es jetzt nicht mehr gehen soll.

[Teekeks]

Nun ja, es geht in gewisser weise.
Die Form ist zwar da, es wird aber nicht mehr der Rahmen angezeigt, egal was ich mache...