判断是否有指定的进程名

//判断是否有指定的进程名
bool __fastcall TfromUpdate::ProcessIsRun(AnsiString imgName)
{
   PROCESSENTRY32 uProcess;
   uProcess.dwSize=sizeof(PROCESSENTRY32);
   HANDLE ProListHan;
   int res;
   bool result=false;

   ProListHan = CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,0);

    if(ProListHan)
    {
        res=Process32First(ProListHan,&uProcess);
        while(res)
        {
            if(memcmp(uProcess.szExeFile,imgName.c_str(),8)==0)
            {

                result=true;
                break;
            }
            res=Process32Next(ProListHan,&uProcess);
        }
    }
    else
    {
        result=false;
    }

    return result;
}