MainForm and SubForm

[DragonFly]

Hallo allemaal,

Ik heb een Mainform en start een Subform via Show;
Nu minimaliseer ik de Mainform en dan is mijn Subform ook weg? Logisch denk ik, maar is dit op te lossen?
Dus de Subform blijft fullscreen op scherm 2 ondanks de Mainform onzichtbaar (Minimize)

Groetjes.

[Knollie]

Is dit misschien iets?

procedure TTestForm.TestBtnClick(Sender: TObject);
begin
  try
    Hide;
    TestSubForm.ShowModal;
  finally
    Show;
  end;
end;

[DragonFly]

Dat is niet wat ik bedoel, Knollie.

Probleem gevonden hier:
https://stackoverflow.com/questions/...form-maximized

Voor de fans:

protected
    { Protected declarations }
    procedure CreateParams(var Params: TCreateParams); override;

procedure TSubForm.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  with Params do
  begin
   ExStyle := ExStyle or WS_EX_TOPMOST;
   WndParent := GetDesktopwindow; // of 0?
  end;
end;

Of het altijd goed gaat dat zien we vanzelf wel