That's what I did.
The x32 and x64 hook works very well.
But when I quit Windows the x64 Hook generates an error.
As I don't understand why, I look at the other bookstores available.
what I don't see
this is how to adapt
[Delphi]
GlobalData^.SysHook := SetWindowsHookEx(idHook, lpfn, hMod, 0);
in
[DDETOURS ???]
TrampolineMessageBox := InterceptCreate(@MessageBox, @InterceptMessageBox, Self);