ReadProcessMemory Types of actual and formal var parameters must be identical

转自：https://www.cnblogs.com/cb168/p/5884673.html

delphi XE Berlin ReadProcessMemory WriteProcessMemory
delphi XE，Berlin

[dcc32 Error] Unit9.pas(93): E2033 Types of actual and formal var parameters must be identical

function ReadProcessMemory(hProcess: THandle; const lpBaseAddress: Pointer; lpBuffer: Pointer;
nSize: SIZE_T; var lpNumberOfBytesRead: SIZE_T): BOOL; stdcall;
{$EXTERNALSYM ReadProcessMemory}
function WriteProcessMemory(hProcess: THandle; const lpBaseAddress: Pointer; lpBuffer: Pointer;
nSize: SIZE_T; var lpNumberOfBytesWritten: SIZE_T): BOOL; stdcall;

lpNumberOfBytesRead: SIZE_T用dwBytesWriten: THandle;类型就可以了。
SIZE_T，即NativeUInt。