Delphi 如何与 Detours 库互操作？

Posted 2023-02-22

【中文标题】Delphi 如何与 Detours 库互操作？

【英文标题】：How Delphi Interop with Detours Library?

【发布时间】：2013-03-02 06:31:45

【问题描述】：

我正在寻找 Delphi 示例，但我只能找到 C++ 示例代码。

例如，如何在Delphi中定义下面的钩子？

DETOUR_TRAMPOLINE(int   WINAPI SetScrollInfoT(HWND, int, LPCSCROLLINFO, BOOL), SetScrollInfo)

【问题讨论】：

为什么不使用原生的 Delphi 挂钩库？

喜欢这个：madCodeHook.

谢谢@David，你能给我推荐一个吗？

madCodeHook 非常棒，我认为有免费的也可以做蹦床，如果你正在寻找的话。

当我使用它时，我认为它对于非商业用途是免费的。但是现在你必须买它而且它并不便宜。他也不会仅仅把它卖给任何人，因为他有很多人滥用他的库来获取恶意软件等问题......你必须证明你的意图，他会对你的身份进行背景调查。但除此之外，它是我用过的最专业的代码之一。

【参考方案1】：

如果您只需要在自己的进程中进行挂钩，您可以查看 Detours 库。我最近在作者同意的情况下将它包含在我的 Cromis 库中。

您可以找到它here。只需下载整个库并使用 Cromis.Detours。它适用于 32 位和 64 位，并且编写得非常好。

【参考方案2】：

谢谢大家，终于收到Ring3HookLibrary