求教这个代码，如何和读行挂钩？谢谢

冥界3大法王

http://www.delphitop.com/html/wenjian/4968.html

[Asm] 纯文本查看 复制代码

function R(const FileName: string): string;
var
  M: TFileStream;
begin
  M := TFileStream.Create(FileName, fmOpenRead);
  try
    SetLength(Result, M.Size);
    M.Read(Result[1], M.Size);
  finally
    M.Free;
  end;
end;

Jack2002

还有人学Delphi??? TStringList.LoadFromFile

冥界3大法王

Jack2002 发表于 2021-2-4 18:44
还有人学Delphi??? TStringList.LoadFromFile

慢，慢死，虽然结果正确，但正则按行对比大文件就慢很多了。

Jack2002

冥界3大法王 发表于 2021-2-4 19:10
慢，慢死，虽然结果正确，但正则按行对比大文件就慢很多了。

TFileStream读完文件，用换行符分割成数组再处理，或者多线程处理，只能给点思路，我至少6年没摸过Delphi，电脑上也没安装Delphi！

wangyujie96

这不是直接读取整个文件到内存吗？大文件肯定不能这样做。看你给的链接里是利用内存映射的页缓存机制来避免读整个文件。

c03xp

用指针搜索 \r 和 \n