delphi 執行程序不在任務欄顯示

Application.MainFormOnTaskbar := False;

procedure TForm1.FormShow(Sender: TObject);
begin
  ShowWindow(Application.Handle, SW_HIDE); //不顯示在任務欄上
end;

通過上面兩行代碼隱藏執行程序圖標。