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');
这样行不行。
手打的。