DELPHI2009中如何实现在系统任务栏隐藏窗口标题?

Question

高手給个例子啊,用2007的方法不管用了 procedure TForm1.FormCreate(Sender: TObject); 
begin 
  with Application do 
    SetWindowLong(Handle,GWL_EXSTYLE,GetWindowLong(Handle,GWL_EXSTYLE) and not WS_EX_APPWINDOW or WS_EX_TOOLWINDOW); 
  SetWindowPos(Handle,HWND_TOPMOST,0,0,0,0,SWP_NOMOVE or SWP_NOSIZE); 
end; 
还有 ShowWindow(Application.Handle, SW_HIDE); 
SetWindowLong(Application.Handle, GWL_EXSTYLE, 
not (GetWindowLong(Application.handle, GWL_EXSTYLE) 
or WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW)); 
都不可以实现,请高手帮下我