答案:var
M,M2: TFileStream;
begin
M := TFileStream.Create('file1', fmOpenRead);
M2 := TFileStream.Create('file2', fmOpenRead);
M.CopyFrom(M2, 0);
RicheEdit1.Lines.LoadFromStream(M);
end;
其他:RichEdit1.Lines.LoadFromFile('1.txt');
RichEdit1.Lines.LoadFromFile(RichEdit1.Text + '2.txt');
这样行不行。
手打的。
上一个:delphi窗口问题
下一个:请问,delphi中怎么连续自动命名txt文件。点击一次创建一个。如 1.txt , 2.txt, 3.txt ......