如何使程序不出现在任务栏中?及如何再实现出现在任务栏中

Question

ShowWindowASync(Application.Handle ,SW_HIDE) ; //隐藏
ShowWindowASync(Application.Handle ,SW_SHOW) ; //显示

Answer 1

是么?
不是用api函数么
隐藏掉用setwindowlong(application.handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);
那恢复用什么函数呢?请解答!

Answer 2

ShowWindow(Application.Handle, SW_HIDE);//隐藏
ShowWindow(Application.Handle, SW_SHOW);//显示
 

Answer 3

Application.Show
Application.hide

Answer 4

从任务栏隐藏
var
  style : integer
begin
style := GetWindowLong(Application.Handle, GWL_EXSTYLE );
style := style or WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW;
SetWindowLong(Application.Handle, GWL_EXSTYLE, style );
end;
再显示的话，只要把第二句改成
style := style or WS_EX_APPWINDOW and not WS_EX_TOOLWINDOW;
就行了。