如何實現任務欄不出現程序圖標??(41分)

  • 主题发起人 主题发起人 luyear
  • 开始时间 开始时间
L

luyear

Unregistered / Unconfirmed
GUEST, unregistred user!
我試用下面的代碼:有時可以,有時不行,還有沒有其他的辦法??<br>ShowWindow(Application.Handle, SW_HIDE);<br>SetWindowLong(handle,GWL_ExStyle,WS_EX_toolWindow);
 
<br>Application.showMainForm:=false不知行不行<br>加到。DPR中
 
我的程序中<br>ShowWindow(Application.Handle, SW_HIDE);<br>不行,<br>SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW);<br>可以。<br>怎么回事,第一句我在很多书上见过,可我的程序中却不行,第二句应该可以呀。
 
procedure TForm1.FormCreate(Sender: TObject);<br>begin<br>&nbsp; &nbsp; &nbsp;SetLastError(0);<br>&nbsp; &nbsp; &nbsp;SetWindowLong(Application.Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);<br>end;<br><br>
 
还有一方法:<br><br>&nbsp; SetWindowLong( Application.Handle, GWL_EXSTYLE,<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;GetWindowLong(Application.Handle, GWL_EXSTYLE) or<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW);<br><br>
 
接受答案了.
 
后退
顶部