HookCode(Ptr($55D102), @MuFuncAsm, C_HOOKTYPE_JUMP, 7); FUNCTION MyFuncAsm; ASSEMBLER; {$FRAME-} ASM // Старый код MOV [DWORD FS:0],ECX MOV ESP,EBP PUSHAD PUSHFD PUSH EAX CALL MyFunc POPFD POPAD // RET END; PROCEDURE MyFunc (Obj: PSomeObj); BEGIN ShowMessage(Obj.DefName); END;