Application.MainFormOnTaskbar := False;
procedure TForm1.FormShow(Sender: TObject);begin ShowWindow(Application.Handle, SW_HIDE); //不显示在任务栏上end;
通过上面两行代码隐藏执行程序图标。