Все, вроде бы разобрался... Надо было сохранять значения для каждой из перехватываемых ф-ций JmpZwq: far_jmp; OldZwq: OldCode; PtrZwq: pointer;
Спасибо за ответ, но все же. В ф-ции procedure SetHook(); var Bytes: dword; begin PtrZwq := GetProcAddress(GetModuleHandle('ntdll.dll'),...
в статье "Перехват API функций в Windows NT (часть 1). Основы перехвата." расписаны методы установки Hook на NativeAPI ф-ции. По образу ProcHide...
Separate names with a comma.