I
import
Unregistered / Unconfirmed
GUEST, unregistred user!
新建一个工程，主窗体为FORM1，另外有一个窗体为FORM2，两个窗体都显示到桌面上，如何做到：
当FORM1最小化时，FORM2仍然保持在屏幕上？（是不是要更改FORM2的Parent，但我将FORM2的Parent设为桌面仍然不行)
很简单啊，只需要重载Form2的CreateParams方法，如下所示：
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
inherited;
Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;//可以在TaskBar上显示Form2的标题，如果不需要可以去掉。
Params.WndParent := GetDesktopWindow;//哈哈，原来奥秘在这儿！！
end;
赶快试试看？
当FORM1最小化时，FORM2仍然保持在屏幕上？（是不是要更改FORM2的Parent，但我将FORM2的Parent设为桌面仍然不行)
很简单啊，只需要重载Form2的CreateParams方法，如下所示：
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
inherited;
Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;//可以在TaskBar上显示Form2的标题，如果不需要可以去掉。
Params.WndParent := GetDesktopWindow;//哈哈，原来奥秘在这儿！！
end;
赶快试试看？