同时激活两个窗体(200分)

  • 主题发起人 主题发起人 hua1081979
  • 开始时间 开始时间
H

hua1081979

Unregistered / Unconfirmed
GUEST, unregistred user!
一个全屏的窗体,是由一个小窗体show出来的,通过SetWindowPos(FrmMain.handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE);这个语句能让小窗体在最前面,
但是最小化一下返回时小窗体就跑到后面去了,在OnPaint事件里也处理了,还到系统托盘时返回的时候也是跑到后面去,也在还原事件中处理了,不知道什么原因,哪位要是能知道的话不烦告诉一下,或有什么更好的办法,先谢了。。。
 
小窗口:
TFormX = class(TForm)
protected
procedure CreateParams(var Params: TCreateParams); override;
end;

procedure TFormX.CreateParams(var Params: TCreateParams);
begin
inherited;
Params.WndParent := 全屏窗口.Handle;
end;

这样小窗口就会永远在"全屏窗口"上面,也不用SetTopMost
 
谢谢,问题已解决
 

Similar threads

后退
顶部