delphi 让执行程序不在任务栏显示

Application.MainFormOnTaskbar := False;

procedure TForm1.FormShow(Sender: TObject);
begin
  ShowWindow(Application.Handle, SW_HIDE); //不显示在任务栏上
end;