关于多窗体的问题!!多谢大哥指点!!(100分)

  • 主题发起人 主题发起人 YourEyes
  • 开始时间 开始时间
Y

YourEyes

Unregistered / Unconfirmed
GUEST, unregistred user!
我在做一个类QQ的程序,当主窗体FrmMain收到信息时动态创建一个窗体FrmMsg

我用FrmMsg.show方法,但是FrmMain不激活时,FrmMsg不能像QQ的信息窗体那样显示,非得
把FrmMain激活,才能显示FrmMsg,并且FrmMsg不能显示在任务栏中。

如何做??

多谢
 
这样做,就可以不用激活FrmMain也能把FrmMsg打开
FrmMsg.show;
Application.BringToFront;
 
在你的FrmMsg中加入以下代码试试. :-)
在Public部分加入:
procedure CreateParams(var Params: TCreateParams); override;

implementation:

procedure TForm2.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.WndParent := GetDesktopWindow;
end;
 
installshield express4
 
后退
顶部