发现这个开源库，可以Hook Delphi的底层实现。快来看看：

The Delphi Detours Library is a library allowing you to hook Delphi and Windows API functions. It provides an easy way to insert and remove hook.

https://github.com/mahdisafsafi/delphi-detours-library

Delphi Detours Library