//隐藏任务栏上的窗口。
ShowWindow(Application.Handle,SW_HIDE);
//在结束任务窗口中隐藏
var
Form1: TForm1;
function RegisterServiceProcess(dwProcessID,dwType:integer):integer;stdcall;external 'KERNEL32.DLL';
implementation
{$R *.DFM}
procedure TForm1.Button1Click(Sender: TObject);
begin
RegisterServiceProcess(GetCurrentProcessId(),1);
end;
另外:
ShellExecute(handle,nil,'d:\mfc2.rar',nil,nil,SW_SHOWNORMAL);