销售管理软件版1楼: 怎样同时导入多个文件到一个Memo中？
怎样追加导文件入文件？
打开对话框已经设置.

2楼: procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.LoadFromFile(＇＇d:＼你的文件.txt＇＇);
Memo2.Lines.Add(Memo1.Lines.Text)
end; 如管家婆仓库管理软件

3楼: 这是个方法,不过我不想用到2个Memo,有没有好点的方法？

4楼: 那你就提前把多个文件的内容读到程序中在赋给memo

5楼: procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
Memo1.Lines.LoadFromFile(＇＇E:＼新建 文本文档.txt＇＇);
for i:=0 to Memo1.Lines.Count-1 do
begin
Memo1.Lines.Add(Memo1.Lines.Strings[i]);
end;
end;

6楼: 你可以用TStringList做
T:TStringList;
T:=TStringList.Create;
try
T.loadfromfile(＇＇d:＼dddd.txt＇＇);
memo1.lines.AddStrings(T);
T.Clear;
T.loadfromfile(＇＇e:＼eeee.txt＇＇);
memo1.lines.AddStrings(T);
finally
T.free;
end;

销售管理软件版7楼: 多人接受答案了。