当前位置：首页 - 正文

delphi 循环

发布网友发布时间：2024-10-14 13:02

共3个回答

热心网友时间：2024-12-14 22:09

那就直接用循环语句啊

var
i: Integer;
begin
for i := 1 to n do
begin
ReadProcessMemory(ProcessID, Pointer(ECXI + $4), @ECXI, 4, Num);
end;
end;

这样就好了啊

热心网友时间：2024-12-14 22:09

const baseadr = $010e4338;
Var
I:integer;
begin
ReadProcessMemory(ProcessID, Pointer(baseadr), @ECXI, 4, Num);
//让 ReadProcessMemory(ProcessID, Pointer(ECXI + $4), @ECXI, 4, Num);加 N次
for I:=1 to N do
ReadProcessMemory(ProcessID, Pointer(ECXI + $8), @ECXI, 4, Num);
ReadProcessMemory(ProcessID, Pointer(ECXI + $f8), @ECXI, 4, Num);
end;

热心网友时间：2024-12-14 22:10

不知道这么对不
Var
const baseadr = $010e4338;
end;
ReadProcessMemory(ProcessID, Pointer(baseadr), @ECXI, 4, Num);
ReadProcessMemory(ProcessID, Pointer(ECXI + $4), @ECXI, 4, Num);
ReadProcessMemory(ProcessID, Pointer(ECXI + $4), @ECXI, 4, Num);
ReadProcessMemory(ProcessID, Pointer(ECXI + $4), @ECXI, 4, Num);
ReadProcessMemory(ProcessID, Pointer(ECXI + $8), @ECXI, 4, Num);
ReadProcessMemory(ProcessID, Pointer(ECXI + $f8), @ECXI, 4, Num);

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。
E-MAIL:11247931@qq.com

焦点

delphi 循环

最新推荐

猜你喜欢

热门推荐