Question

我正在使用CreateProcess API将RealVNC与我的exe集成...我只需要为创建的vnc客户端处理句柄，但到目前为止我还没有成功。代码非常简单：

procedure TForm1.VncAuth;
var
  StartInfo: TStartupInfo;
  ProcInfo: TProcessInformation;
  CmdLine: string;
  title: string;
  ProcHandle: THandle;
begin
  FillChar(StartInfo,SizeOf(TStartupInfo),#0);
  FillChar(ProcInfo,SizeOf(TProcessInformation),#0);
  StartInfo.cb := SizeOf(TStartupInfo);
  CmdLine:= 'vnc.exe';
  UniqueString(CmdLine);
  CreateProcess(NIL ,PChar(CmdLine), NIL, NIL, False, CREATE_NEW_CONSOLE or NORMAL_PRIORITY_CLASS
                                  , NIL, NIL, StartInfo, ProcInfo);
  ProcHandle:= ProcInfo.hProcess;
  GetWindowText(ProcHandle, PChar(title), 255);
  ShowMessage(title);
end;

标题var中没有返回任何内容... GetWindowText函数只是一个测试，看看我是否有正确的句柄，如果是，我应该看到vnc客户端标题是正确的？谢谢！

Answer 1

窗口句柄和进程句柄不是一回事。对于GetWindowText，您需要一个窗口句柄。

创建流程调用WaitForInputIdle后，允许流程启动并创建其主窗口。
致电EnumWindows以枚举顶级窗口。
对于每个顶级窗口，请调用GetWindowThreadProcessId以查找创建该窗口的进程的进程ID。您创建的流程的流程ID为ProcInfo.dwProcessId。
当您找到一个进程ID与您刚刚创建的进程ID相匹配的窗口时，该窗口就是您的家伙！

CreateProcess并获取句柄

1 个答案: