assist.pas

来自「很多人想要研究的真彩传奇2客户端,一般来说传奇2的客户端是256色的,现在出了个」· PAS 代码 · 共 18 行

unit Assist;

interface

  // 返回指针增量后的指针
  function IncPointer(const P: Pointer; IncSize: Integer): Pointer;



implementation

  function IncPointer(const P: Pointer; IncSize: Integer): Pointer;
  begin
    Result := Pointer(Integer(P) + IncSize);
  end;

end.