DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: zyt1990
今日帖子: 41
在线用户: 16
导航: 论坛 -> DELPHI技术 斑竹:liumazi,sephil  
作者:
男 tjz929 (日出) ★☆☆☆☆ -
盒子活跃会员
2020/3/26 15:23:47
标题:
文件VCLFixPack.pas里调用Windows系统函数ReadProcessMemory编译提示形参和实参不一致,请问怎么解决? 浏览:161
加入我的收藏
楼主: 下面红色字体为提示编译形参和实参不一致
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;
----------------------------------------------
-
作者:
男 keymark (keymark) ▲△△△△ -
注册会员
2020/3/26 20:04:22
1楼: 很神秘直到无人问起,
----------------------------------------------
https://www.cnblogs.com/marklove/
作者:
男 abcjingtong (jingtong) ▲▲▲▲▲ -
注册会员
2020/3/26 21:29:29
2楼: 形参和实参不一致,改成一致不就行了么?ReadProcessMemory第二个参数要const声明你的不是。
----------------------------------------------
18114532@qq.com
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v2.1 版权所有 页面执行31.25毫秒 RSS