如何在Delphi7中调用GetProcessHandleFromHwnd？

如何在Delphi7中调用GetProcessHandleFromHwnd

显然，这是XP引入的Windows API函数

---

无法直接调用该函数。但你可以做一个参考：

// reference to the Windows function:
function GetProcessHandleFromHwnd(hwnd: HWND): THandle; external 'oleacc.dll' name 'GetProcessHandleFromHwnd'; stdcall;

// and you can call it from your own function:
function TryGetProcessHandle(const WindowHandle: THandle; var ProcessHandle: THandle): Boolean;
begin
  ProcessHandle := GetProcessHandleFromHwnd(WindowHandle);
  Result := (ProcessHandle <> 0);
end;

//对Windows函数的引用：
函数GetProcessHandleFromHwnd（hwnd:hwnd）：THandle；外部“oleacc.dll”名称“GetProcessHandleFromHwnd”；stdcall；
//您可以从自己的函数调用它：
函数TryGetProcessHandle（constWindowHandle:THandle；var ProcessHandle:THandle）：布尔；
开始
ProcessHandle:=GetProcessHandleFromHwnd（WindowHandle）；
结果：=（ProcessHandle 0）；
结束；

与任何其他函数一样；）导入很好。很好，谢谢，我将尝试使用它。对oleacc进行Web搜索。pasGetProcessHandleFromHwnd应该是

stdcall

，为什么不能直接调用它？我认为，在Delphi中不能直接调用GetProcessHandleFromHwnd。该函数位于Oleacc.dll中，请参阅-因此我包括了WinApi.Oleacc，但该函数未在该单元中引用。