Question

delphi 快速读取内存字符串

delphi 搜索内存中字符串、比如：http://www.baidu.com 类似这样的网站地址、在0x10000000 到 0x50000000 这块地址中搜索、但发现循环读取的时候、速度惊人(慢)

var
I : Integer;
ScanStarAdd,ScanEndAdd ,ss: Dword;
Temp : array[0..15] of char;
for I :=ScanStarAdd to ScanEndAdd - 1 do
begin
ReadProcessMemory( ProcessHwnd, pointer(ScanStarAdd ),@Temp,16,SS) ;
if checkUrl( Temp ) then
begin
/////保存当前网站地址
end;
ScanStarAdd := ScanStarAdd + $1;
application..ProcessMessages;
end;

貌似这样读取非常的不行、
看到CE那样的工具挺快的、就是多线程 学的有点迷糊

Answer 1

Temp : array[0..15] of char;
你这缓冲太小了，使用GetMem获取几M的内存然后去搜索会快一些
checkUrl的算法要优化
ScanStarAdd := ScanStarAdd + $1;不能这样向后推移，必须一次一次推移缓冲区大小-URL长度的字节数

Answer 2

可以一次多读一些, 然后再在内存中找, 应该快很多! 缺点是比较占内存