窗体消失了,怎么解决???(50分)

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

YYGGQQ

Unregistered / Unconfirmed
GUEST, unregistred user!
DELPHI开发一个系统,一个显示进度的窗体在系统运行调用该窗体时,当进度走到一部分时窗体就消失了,查看后是跑到了主窗体的后面,等运行完后就又显示到主窗体的前面了,不知道如何解决一下,不让它跑到主窗体的后面??
 
重载createparams.
procedure tform1.CreateParams(var params: TCreateParams);
begin
inherited;
params.ExStyle:=params.ExStyle or ws_ex_topmost;
end;
 
后退
顶部