怎样隐藏运行我的应用程序

Question

程序一开始就看不：
application.showmainform:=false;看不见进程：
在implementation后添加声明:
      function RegisterServiceProcess(dwProcessID, dwType: Integer): Integer; 
      stdcall; external 'KERNEL32.DLL';
      再在上面的窗口Create事件加上一句：RegisterServiceProcess(GetCurrentProcessID, 1);//隐藏

Answer 1

function RegisterServiceProcess(a:longint;const b:longint):dword;stdcall;far;external 'Kernel32.dll' name 'RegisterServiceProcess';
#define RSP_SIMPLE_SERVICE 1
#define RSP_UNREGISTER_SERVICE 0//下面代码为隐藏
DWORD dwID,redserv;
dwID = GetCurrentProcessId();
regserv = RegisterServiceProcess(pid,RSP_SIMPLE_SERVICE);
//恢复隐藏
dwID= GetCurrentProcessId()
regserv = RegisterServiceProcess(pid,RSP_UNREGISTER_SERVICE);
不过上述代码对win2K不起作用，谁知道在win2K下怎么做告诉我一声，先谢了

Answer 2

Form.Width:=0;
    Form.Height:=0;
    setwindowlong(application.Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);
一句话搞定，注意，引用ShellAPI单元。

Answer 3

楼上说的有道理，但是我想用不着这么麻烦
1.如果想隐藏主窗体，同意楼上的，Application.ShowMainForm:=False;
2.如果不想在任务栏和ALT+CTRL+DEL的任务列表中看到你的程序，可以这样做：
  ShowWindow(Application.Handle, SW_HIDE);
楼上说的也对，但是这个函数在NT下不能使用；
我的方法在在任何地方都可以用，但是在NT的进程列表中还是可以查到，但是在任务列表中已经看不到了：）

Answer 4

TO taken
   你说的showwindow()好想不行