窗体最小化时如何不出现在任务栏中。

Question

在FormShow中这么写
ShowWindows(Application.Handle,SW_Hide)

Answer 1

SetWindowLong(Application,Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW); 

Answer 2

还要响应窗口的最小化事件，完整的例子如下：
procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND; 
...
procedure TForm1.WMSysCommand; 
begin
  if (Msg.CmdType = SC_MINIMIZE) then
    SetWindowLong(Application,Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW)
  else 
    inherited; 
end;

Answer 3

呵呵，可以重载form的CreateParams函数
eg
　protected
    procedure CreateParams(var Params: TCreateParams); override;
  publicprocedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  Params.WndParent := GetDesktopWindow;
end;
 

Answer 4

错了
是Params.Style:=Params.STYlE or WS_EX_toolwindow
其实hint窗口就是这种类型的