I have a simple InstallHook that perform nothing:
function MyHook(lpLibFileName: PWideChar): Pointer;
begin
Result := nil;
end;
initialization
InstallHook(MyHook);
finalization
UninstallHook;
end.
When launch the application build with Win64 platform, it raise A call to an OS function failed error.
The above code works on Win32 build.