msdn：请检查ZwQueryObject的返回值，若为STATUS_INFO_LENGTH_MISMATCH，则表示ObjName的缓冲区不够大(The info length is not sufficient to hold the data)。另外这个函数的输出是对象的信息，不清楚是不是里面只有一个名字。
另外看看返回值是不是STATUS_ACCESS_DENIED拒绝访问之类的。

C++是这样弄的，这个是别人的资料，其中一个地很不懂，红字标注的

//获取系统所有句柄信息
  do
  {
    //申请内存
    pHandleInfor = (ULONG*)malloc(ulSize);
    if(NULL == pHandleInfor)
    {
      //申请内存失败
      return false;
    }

    ntStatus = ZwQuerySystemInformation( SystemHandleInformation, pHandleInfor, ulSize, NULL);   
    if(!NT_SUCCESS(ntStatus))
    {
      //空间不足继续申请。
      free(pHandleInfor);
      ulSize = ulSize * 2;  
      
      //为防止ZwQuerySystemInformation一直失败，程序陷入死循环，当申请的空间超过64M时则返回失败
      if(ulSize > 0x4000000)
      {
        return false;
      }
    }
  }while(!NT_SUCCESS(ntStatus));
   
  //转换数据结构类型
     Handles = (PSYSTEM_HANDLE_INFORMATION_EX)pHandleInfor;
  if(NULL == Handles)
  {
    return false;
  }

  //获取当前进程pid
  pid = GetCurrentProcessId();

  //申请空间，用于存储对象的名字信息
     ObjName =  (POBJECT_NAME_INFORMATION)malloc(0x2000 );
     {这里申请的内存是给结构体的，我申请的是结构里的Buffer的，是不是这里的问题 delphi不让给结构体分配内存，类型不匹配 结构：=指针不行，要怎么给以声明好的结构体分配内存呢}
  //开始搜索获取的句柄信息，并对句柄对应的对象名进行比较，如果与要求关闭的名字相同，则关闭此句柄
  for(i = 0; i < Handles->NumberOfHandles; i++)
  {      
    //对于不是本进程的句柄对象，直接pass掉，如果要实现关闭其它进程的对象，则可以首先根据PID打开这个句柄所在的进程，
    //然后复制此对象，然后进行名字比较，如果相同，则可以通过创建远程线程的方式，关闭掉。
    if(pid != Handles->Information[i].ProcessId)
    {      
      continue;
    }
    //获取这个对象的类型
     if (Handles->Information[i].ObjectTypeNumber != 0x0b)
    {
        //非互斥内核对象类型
         continue;
     }
    //获取这个对象的名字信息
    ntStatus = ZwQueryObject((HANDLE)Handles->Information[i].Handle, ObjectNameInformation, ObjName, 0x2000, NULL);
    if(!NT_SUCCESS(ntStatus))
    {
      //查询对象失败，进行下一个
      continue;
    }

    //将unicode 字串转换为 ansi字串
    WideCharToMultiByte(CP_ACP, 0, ObjName->Name.Buffer, -1, pName, 200, NULL, NULL);   
    if( 0 == strcmp(pName, pObjectName))
    {
      //找到对应名字的对象，将其关闭
      CloseHandle((HANDLE)Handles->Information[i].Handle);
      //释放申请的空间
      free(Handles);
      free(ObjName);
      
      return true;
    }
  }
  
  //释放申请的空间
  free(Handles);
  free(ObjName);

  return false;
}