把当前进程变为一个系统服务，从而在任务列表中把程序隐藏起来
function RegisterServiceProcess (dwProcessID, dwType: DWord) : DWord; stdcall; external ’KERNEL32.DLL’; {把当前进程变为一个系统服务，从而在任务列表中把程序隐藏起来}procedure TForm1.Button1Click(Sender: TObject);beginRegister...
