FormStyle: fsMDIChild und fsNormal kniffligknifflig:)

[Maa83]

Hallo hier mal was kniffliges

und zwar hab ich ein Fenster als MDI Child
ich kann mir auch wunderbar Fenster damit erschaffen
z.B. mit Fenster1 := TSuchenDLG.Create(Self); (SuchenDLG heisst das Teil)

so nun bin das Fenster aber nur mit .Show anzeigen nicht mit .showModal

an einer Stelle brauch ich aber genau diesen Aufruf

kann mir irgendjemand helfen das zu meistern wie ich aus einem Fenster je nach Bedarf ein MDIChild oder ein normales Fenster machen kann...

vielen Dank schon mal
Maa

[mika]

Hallo,

vielleicht n bisschen unsaubere Methode aber es funktioniert.

Delphi-Quellcode:

 TRY
   F_Suchen.Destroy;
 EXCEPT
 END;
 F_Suchen := TF_Suchen.Create(Self);
 F_Suchen.FormStyle := fsNormal;
 F_Suchen.Visible := False;
 F_Suchen.ShowModal;

hab ich nur schnell zusammengetipt, gibt garantiert bessere lösungen

bis denn, mika

[mika]

hups, hier noch schnell vom normal zum mdi child

Delphi-Quellcode:

 TRY
   F_Suchen.Destroy;
 EXCEPT
 END;
 F_Suchen := TF_Suchen.Create(Self);
 F_Suchen.FormStyle := fsMdiChild;
 F_Suchen.Visible := True;
 F_Suchen.Show;

kannst das ganze auch nch abfragen mit:

Delphi-Quellcode:

  If F_Suchen.Formstyle = fsNormal then
  begin
    // mach n mdi child draus
  end else
  begin
    // mach n normal draus
  end;

bye, mika

P.S: In ner halben stunde ist feierabend !