delphi的opendialog多选问题

opendialog1.Options:=opendialog1.Options+[ofAllowMultiSelect];
if OpenDialog1.Execute then
memo1.Lines.Assign(opendialog1.Files);
在实现多选时，在显示第一次选中的文件名之后我想把第二次选中的内容不覆盖第一次的，而是延续到MEMO中第一次内容的下一行显示。
怎么写代码呀？

memo1.Lines.AddStrings(opendialog1.Files);

楼上 正解. 或者 用memo1.lines.append(.......);循环添加

//打开不存在文件时候报错，不是对话框问题，而是你处理的问题。 你可以在处理之前判断文件是否存在，不存不进行下面处理就可以了 ，下面o1是个对话框控件： procedure tform1.button1click(sender: tobject); var s:string; //判断文件是否存在 function file_ifexist(filename: string): boolean ; begin result := true; try if not fileexists(filename) then result := false; except result := false; end; end; begin if o1.execute then begin if not file_ifexist(o1.filename) then begin //给个文件不存在的提示 abort; end; s:=o1.filename; end; end;