DWORD dwExStyle = GetWindowLong(Application->Handle, GWL_EXSTYLE);
dwExStyle |= WS_EX_TOOLWINDOW;
SetWindowLong(Application->Handle, GWL_EXSTYLE, dwExStyle);
Application->Initialize();
Application->CreateForm(__classid(TForm1), &Form1);
Application->ShowMainForm = false;
ShowWindow(Application->Handle, SW_HIDE);
Application->Run();
這樣做之后，應用程序就不會在任務欄顯示了，但在WIN9X的任務列表中仍能看到。要想在任務列表也將自己的程序隱藏就要借用kernel32.DLL中的RegisterServiceProcess這個函數了。由于要從DLL加載函數，我們先在頭文件中加入：
typedef DWORD (__stdcall *pRegFunction)(DWORD, DWORD);
在主Form的類定義中加入兩個私有屬性:
HINSTANCE hKernelLib;
pRegFunction RegisterServiceProcess;
用于記錄從DLL加入的函數信息。
然后在主Form的構造代碼中加入如下代碼:
hKernelLib = LoadLibrary("kernel32.dll");
if(hKernelLib)
{
RegisterServiceProcess =
(pRegFunction)GetProcAddress(hKernelLib,
"RegisterServiceProcess");
if(RegisterServiceProcess)
RegisterServiceProcess(GetCurrentProcessId(),RSP_SIMPLE_SERVICE);
}
這段代碼主要是把當前進程變為一個系統服務，從而在任務列表中把程序隱藏起來,相應的在構析代碼中加入
if(hKernelLib)
{
if(RegisterServiceProcess)
RegisterServiceProcess(GetCurrentProcessId(),
RSP_UNREGISTER_SERVICE);
FreeLibrary(hKernelLib);
}
這樣處理之后，程序就不在任務列表中出現了，但仍可用EnumWindows函數查出來。
延伸閱讀
文章來源于領測軟件測試網 http://www.kjueaiud.com/
