SetWindowLong隐藏状态栏的图标

//SetWindowLong隐藏状态栏的图标

//本程序在任务栏中不显示MSTaskListWClass

 

procedure TForm1.FormCreate(Sender: TObject);

begin

  ShowWindow(Application.Handle, SW_HIDE);//隐藏任务栏中图标

  SetWindowLong(Application.Handle, 

            GWL_EXSTYLE, 

            GetWindowLong(Application.Handle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW);

end; 

通过 Wiz 发布