[[escafandra]]

Pues usemos la versión Unicode para el builder xe (y para bcb6) :

bool IsRuningW(WCHAR* FileName)
{
   PROCESSENTRY32W Proceso;
   HANDLE ProcessHandle;
   bool Result = false;

   Proceso.dwSize = sizeof(PROCESSENTRY32W);
   ProcessHandle = CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
   if(Process32FirstW(ProcessHandle, &Proceso)){
     do{
       if(!_wcsicmp(Proceso.szExeFile, FileName)){
         Result = true;
         break;
       }
     }while(Process32NextW(ProcessHandle, &Proceso));
   }
   CloseHandle(ProcessHandle);
   return Result;
}

Saludos.