如何使Delphi程序不显示在任务栏?(50分)

  • 主题发起人 主题发起人 gcq
  • 开始时间 开始时间
G

gcq

Unregistered / Unconfirmed
GUEST, unregistred user!
如何使Delphi程序不显示在任务栏?
各位大虾请伸援手!
 
showwindow(application.handle,false);
哈哈,给分!
 
自动隐藏任务栏图标(TaskBar)
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);
ShowWindow( Application.Handle, SW_SHOW );
end;

 
?!
initialization
begin
SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW or WS_EX_TOPMOST)
end;
 
agree Victortim.
 
一般Windows 95运行程序时都会在任务栏上出现按钮,如果你的程序是一个监视程序,那么出现按钮就不是明智之举了。要实现该功能就要在OnCreate事件里利用到API函数SetWindowLong
procedure TForm1.FormCreate(sender:Tobject);
begin
SetWindowLong(Application.Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);
end;

 
检索一下,你就节约50分
 
多谢大家!
我知道的api不多!所以向大家学习!
 
后退
顶部