下面紅色字體為編譯時提示形參和實參不一致，請問要怎么解決？
編譯時的錯誤提示：Types of actual and formal var parameters must be identical
procedure HookProc(Proc, Dest: Pointer; var BackupCode: TXRedirCode);
var
n: nativeuint;
Code: TXRedirCode;
begin
Proc := GetActualAddr(Proc);
Assert(Proc <> nil);
if ReadProcessMemory(GetCurrentProcess, Proc, @BackupCode, SizeOf(BackupCode), n) then
begin
Code.Jump := $E9;
Code.Offset := PAnsiChar(Dest) - PAnsiChar(Proc) - SizeOf(Code);
WriteProcessMemory(GetCurrentProcess, Proc, @Code, SizeOf(Code), n);
end;
end;
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/12670.html
標籤：VCL組件開發及應用
上一篇：為什么M/2=2？
下一篇：CDataBaseEngineSink::OnRequestHorseRaceLamp 資料庫例外：資料提供程式或其他服務回傳 E_FAIL 狀態。 [ 0