Question

delphi怎么读取多个文本文件

Answer 1

以使用for循环处理，使用定时肯定有问题。
FileNameCount可以是获取目录中的文件数，也可以自己定义。
FileName可以是指定的一个数组，也可以是通过获取目录的文件名数组。
for i:=0 to FileNameCount-1 do
Memo1.Lines.LoadFromFile(fileName[i]);
截取代码过程根据自己的要求做 得到字符串暂存到Str
ListBox1.Items.Add(Str);
end;