Ein TForm in eine Variable kopieren

[TBx]

Zitat:

Zitat:

Du kannst neueform ja mal auf nil oder über Application.CreateForm generieren.



Wie meinst du das?

Ich gehe davon aus, das sich das Self in folgendem Code auf Deine MainForm bezieht:

neueform := Tf_ag.create(Self); Weiter gehe ich davon aus, dasß dieses hier durch Self angesprochenen Form ein MDI-Form ist.
Somit wird dann das neueform als MDI-Child des durch Self angesprochenen Forms generiert.

Dann änderst Du den Style des neueform in fsNormal, machst es unsichtbar und holst es dann durch showmodal wieder hervor.

Du kö nntest stattdessen folgendes versuchen:

Delphi-Quellcode:

with Tf_ag.create (nil) do
begin
  visible := False;
  FormStyle := fsNormal;
  Height := 560;
  Width := 750;
  ShowModal;
  Free;
end;

Hope it helps

Thomas