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; 



posted @ 2012-06-02 10:12  XE2011  阅读(652)  评论(0编辑  收藏  举报