不能被最小化的窗体

  • 主题发起人 主题发起人 import
  • 开始时间 开始时间
I

import

Unregistered / Unconfirmed
GUEST, unregistred user!
如何产生不会按Win+M键而消失的小窗口,类似FLASHGET的悬浮窗,我重载了
procedure TLittlebox.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams( Params);
Params.WndParent:=0;
end;
设这个Form的边为NONE,
结果在任务栏中出现这个窗口的标题,如何才能达到象FLASHGET一样的窗口呢?
我已经知道答案了,从CSDN得知
procedure TLittlebox.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams( Params);
Params.ExStyle := Params.ExStyle or WS_EX_TOPMOST or WS_EX_TOOLWINDOW;
Params.WndParent := 0; // 这是必须的,否则当App变为后台时会将该窗体设置为不TopMost
end;
 

Similar threads

后退
顶部