Need form to stay on top of parent only

问题

I have a multi-window application. My main form is a child of the desktop. My application can create other forms that also become children of the desktop. However, I have a special case where my main form needs to create a form that will always stay on top of it.

I had this working to an extent....however, if I then create other windows in the application this form seems to stay on top of even these!

So basically what I need to know is...

How can I create the form from my main form and make it stay on top of my main form only? Is it possible?

回答1:

procedure TMainForm.Button1Click(Sender: TObject);
var
  f: TForm;
begin
  f := TChildForm.Create(Self);
  f.PopupMode := pmExplicit;
  f.PopupParent := Self;
  f.Show;
end;

Bye.

来源：https://stackoverflow.com/questions/1411085/need-form-to-stay-on-top-of-parent-only