 |
type
TCodeInfo = record
IsValid : boolean;
Opcode : word;
ModRm : byte;
Call : boolean;
Jmp : boolean;
RelTarget : boolean;
Target : pointer;
PTarget : pointer;
PPTarget : TPPointer;
TargetSize : integer;
Enlargeable : boolean;
This : pointer;
Next : pointer;
end;
function ParseCode (code: pointer ) : TCodeInfo; overload;
function ParseCode (code: pointer; var disAsm: string) : TCodeInfo; overload;
|
|