估计你要最小化的窗体吧,你要设置窗口的父窗体为desktop,就能达到目的,
代码如下
private
procedure CreateParams(var Params: TCreateParams);override;
...
procedure Timageform.CreateParams(var Params: TCreateParams);//timagefrom为子窗体
begin
inherited CreateParams( Params);
Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
Params.WndParent := GetDesktopWindow;
end;
代码如下
private
procedure CreateParams(var Params: TCreateParams);override;
...
procedure Timageform.CreateParams(var Params: TCreateParams);//timagefrom为子窗体
begin
inherited CreateParams( Params);
Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
Params.WndParent := GetDesktopWindow;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货