不出现在任务栏 procedure TForm1.FormCreate(Sender: TObject); begin SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW); end; 不出现在任务管理器“应用程序”中 Application.Title := '';