钩子编程g_org_VirtualFunction01 = (VirtualFunction01_t)base[0]; //overwrite base[0] = &hk_VirtualFunction01; VirtualProtect( &base[0], 4, oldProtection, 0 ); //call the
P-code机{program-, base-, topstack-registers} i: instruction; {instruction register} s: array [1..stacksize] of integer; {datastore} function base(l: integer):