程序里生成的Form怎么显示在任务栏中(50分)

  • 主题发起人 主题发起人 Jani
  • 开始时间 开始时间
J

Jani

Unregistered / Unconfirmed
GUEST, unregistred user!
在程序里几个动态生成的窗体,想把它们和主窗体一起显示在任务栏上(就像Foxmail
的收信进度),怎么作?
 
protected
procedure CreateParams(VAR Params: TCreateParams);override;


procedure TForm1.CreateParams(VAR Params: TCreateParams);
begin
Inherited CreateParams(Params);
Params.WndParent := GetDesktopWindow;
end;
 
SetWindowLong(YourForm.Handle,GWL_EXSTYLE,WS_EX_APPWINDOW);
 
是个API呵呵
 
接受答案了.
 
后退
顶部