如何让一个应用程序不出现在任务栏上？

[ttllhh]

一般Windows运行程在任务栏上，
要实现该功能要在OnCreate事件里利用到API函序时都会在任务栏上出现按钮，我想不让它出现数SetWindowLong

procedure TForm1.Button1Click(Sender: TObject);
begin
SetWindowLong(Application , Handle , GWL_EXSTYLE, WS_EX_TOOLWINDOW);
end;

　但是上面这段代码却提示两个错误：
[Error] Unit1.pas(28): Incompatible types: 'HWND' and 'TApplication'　
[Error] Unit1.pas(28): Too many actual parameters

在线等，谢谢!

[Leobo]

SetWindowLong(Application.Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);

[Leobo]

SetWindowLong(Application.Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);

[goomoo]

procedure TForm1.FormShow(Sender: TObject);
begin
showWindow(Application.Handle,SW_HIDE);
end;

[sihang]

参数摄得不对
SetWindowLong(Application.Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);

[lance09]

我倒

[donaldtyp]

SetWindowLong(Application.handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);

[qiuxueQQ]

procedure TfrmLoading.FormCreate(Sender: TObject);
begin
SetWindowLong(Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);//函数
end;
Form的FormStyle属性设为fsStayOnTop

[flyinwuhan]

procedure TForm1.FormActivate(Sender: TObject);
begin
showWindow(Application.Handle,SW_HIDE);
end;