Go to most recent revision | Blame | Last modification | View Log | RSS feed
Ý é ±CG <p
PatchU.pasECG dSysInitÈCÒïcdSystemÈCÒïfByteÝÞRlfInteger|ofTObject÷! GfBooleanNcÇfPointerÅ(Xg.TObjectQ÷2gTObject.SafeCallExceptionøä kgTObject.AfterConstructionùä kgTObject.BeforeDestructionúä kgTObject.Dispatchûä kgTObject.DefaultHandlerüä kgTObject.NewInstanceýä kgTObject.FreeInstanceþä kfCardinalݳùgSizeOf g@ClassCreate\+âg@AfterConstruction(äÇ_gTObject.Destroyÿä kg@BeforeDestructionSa¥g @ClassDestroybI'>gExit gTrue§1ØogFalse¦1Øog@HandleFinallyX,TdceSysUtilsÈCÒïgRaiseLastOSErrorX,TdceWindowsÈCÒïfPByteJtgVirtualProtectCÌgPAGE_EXECUTE_READWRITEóDСgVirtualProtect,k]c*pPatchEventÂîü*TPatchEventUÈ'& .TPatchMethod\» *TPatchMethodä± .2f (TPatchMethod.Create÷ÞÑÕ ò!Self!.fþ!aSource
!aDestination"
OldProtectfðc(TPatchMethod.DestroyøÞÑÕ X!Self!.c(TPatchMethod.HookúÞÑÕ 2!Self c(TPatchMethod.RestoreùÞÑÕ 2!Self c(FinalizationX,Td \! c(PatchU !cE DM
F ,Jump ,OffsetcG ²FJJ 0H þ , PatchedMethod ,OriginalMethod ,PatchPositionMethod ,
FIsPatched (0 IsPatchedþ v .CreateîN/DestroyÄþZ-Restoreîd-Hookî`cD ÿÿÿ@ A ?l-L L TPatchMethod TPatchMethodL PatchU UìÄøSÒtÄðè UÿØÁCS PS ÆCéE+CèCEøPj@jCPè Àuè Ãè Ã}ÿ tè d ÄÃ[YY] SVè ÚðÆè ÓâüÆè Û~Æè ^[Ãx uÆ@PH
HJÃx tÆ@ PH
H JÃUì3ÀUh% dÿ0d ÿ 3ÀZYYdh, Ãé ëø]Ã- ÃmJ H H@HZ"J J$H
N$lB8`&.Z*d(,`2d2hhLh4jLj.Jü0
*
@.^ 6Fj D F F F J J J J "J $J
(N ,*DJ *Z .,bJ ,d 0.|J .` 20nJ 0P CT DV DX H\ b ãÎf ¾h 0N`P0T0T:þPäþZ` 0 \^\Rþ^Rþ`@ b b0þd@ f f0þh j a