[dmartinezn]

Gracias escafandra
Probe este codigo y funciona perfectamente en c++ Builder 6, cuando lo pruebo en c++ builder xe me sale el siguiente error:

E2034 Cannot convert 'wchar_t *' to 'const char *'

Eso sucede en la linea: if(!stricmp(Proceso.szExeFile, FileName))
Por que sucedera eso?,se podra corregir para que funione en esta version?
Saludos.

bool IsRuning(char* FileName)
{
   PROCESSENTRY32 Proceso;
   HANDLE ProcessHandle;
   bool Result = false;

   Proceso.dwSize = sizeof(PROCESSENTRY32);
   ProcessHandle = CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
   if(Process32First(ProcessHandle, &Proceso)){
     do{
       if(!stricmp(Proceso.szExeFile, FileName)){
         Result = true;
         break;
       }
     }while(Process32Next(ProcessHandle, &Proceso));
   }
   CloseHandle(ProcessHandle);
   return Result;
}