Работа с процессами

DWORD GetPIDbyName(LPTSTR szProcessName)    // Получение ID процесса по его имени #include <tlhelp32.h>
{
    HANDLE hSnapShot;
    PROCESSENTRY32 pe = {sizeof(pe)};
    hSnapShot = CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0); // Получаем список запущенных процессов на Windows API
    if (hSnapShot == INVALID_HANDLE_VALUE)
        return 0;
    if (!Process32First(hSnapShot, &pe))
        return 0;
    do
        if(!lstrcmpi(pe.szExeFile,szProcessName))
        {
            CloseHandle(hSnapShot);
            return pe.th32ProcessID;
        }
    while (Process32Next(hSnapShot, &pe));
    CloseHandle(hSnapShot);
    return 0;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    // Убиваем процесс по его ID
    HANDLE hProcess;
    DWORD pid = GetPIDbyName(L"Проект который подлежит уничтожению.exe");   // id нужного процесса
    hProcess = OpenProcess(PROCESS_ALL_ACCESS,FALSE,pid);
    TerminateProcess(hProcess, 0xDEAD);
    CloseHandle(hProcess);
}

    DWORD pid = GetPIDbyName(L"Проект который подлежит уничтожению.exe");   // id нужного процесса
    hProcess = OpenProcess(PROCESS_ALL_ACCESS,FALSE,pid);
    if(!hProcess) // Всего навсего
    {
        ShowMessage(SysErrorMessage(GetLastError()));
    }
    TerminateProcess(hProcess, 0xDEAD);

// код скопирован из www.cyberforum.ru/cpp-builder/thread554614.html
void EnableDebugPriv(void)
{
        String Text = "";
        HANDLE hToken;
        LUID sedebugnameValue;
        TOKEN_PRIVILEGES tkp;
        // enable the SeDebugPrivilege;
        if (!OpenProcessToken(GetCurrentProcess(), TOKEN_ADJUST_PRIVILEGES | TOKEN_QUERY, &hToken))
        {
                Text = "OpenProcessToken() failed, Error = %d SeDebugPrivilege is not available. " + (String)GetLastError();
                //wprintf( L"OpenProcessToken() failed, Error = %d SeDebugPrivilege is not available.\n", GetLastError());
                ShowMessage(Text);
                return;
        }
        // ----
        if (!LookupPrivilegeValue(NULL, SE_DEBUG_NAME, &sedebugnameValue))
        {
                Text = "LookupPrivilegeValue() failed, Error = %d SeDebugPrivilege is not available. " + (String)GetLastError();
                //wprintf( L"LookupPrivilegeValue() failed, Error = %d SeDebugPrivilege is not available.\n", GetLastError());
                ShowMessage(Text);
                CloseHandle(hToken);
                return;
        }
        // ----
        tkp.PrivilegeCount = 1;
        tkp.Privileges[0].Luid = sedebugnameValue;
        tkp.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;
        // ----
         if (!AdjustTokenPrivileges(hToken, FALSE, &tkp, sizeof tkp, NULL, NULL))
         {
                Text = "AdjustTokenPrivileges() failed, Error = %d SeDebugPrivilege is not available. " + (String)GetLastError();
                //wprintf( L"AdjustTokenPrivileges() failed, Error = %d SeDebugPrivilege is not available.\n", GetLastError());
                ShowMessage(Text);
         }
         // ----
         CloseHandle(hToken);
}
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    // Убиваем процесс по его ID
    HANDLE hProcess;
    DWORD pid = GetPIDbyName(L"Проект который подлежит уничтожению.exe");   // id нужного процесса
 
    EnableDebugPriv(); // Вот сюда и вставляем вызов
 
    hProcess = OpenProcess(PROCESS_ALL_ACCESS,FALSE,pid);
    if(!hProcess)
    {
        ShowMessage(SysErrorMessage(GetLastError()));
    }
    TerminateProcess(hProcess, 0xDEAD);
    CloseHandle(hProcess);
}