问个opendialog问题

Question

opendialog选中若干个文件，我想要在EDIT1上显示出它们的FILENAME。
例如：
我选取c盘下的 1.txt ,2.txt ,3.txt 文件，要在Edit1 上显示：‘c:\1.txt,c:\2.txt,c:\3.txt’

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
begin
  OpenDialog1.Options := OpenDialog1.Options + [ofAllowMultiSelect];
  if OpenDialog1.Execute then
  begin
    Edit1.Text := OpenDialog1.Files.CommaText;
  end;
end;

Answer 2

var
 i:integer;
begin
  if  OpenDialog1.Execute then
  begin
      i:=opendialog1.Files.Count;
       for i:=0 to i-1 do
       begin
          if edit1.Text='' then
            edit1.Text:= OpenDialog1.Files.Strings[i]
          else
            edit1.Text:= edit1.Text+','+OpenDialog1.Files.Strings[i];
       end;
       edit1.Text:=edit1.Text+',';
  end;我刚才这样写，可以实现。不知道有没有简单点的方法！
bdmh的方法也可以，但是多了个双引号，能否去掉这个双引号？

Answer 3

去掉双引号，那就循环files吧，然后自己组织

Answer 4

或者用OpenDialog1.Files.CommaText;然后替换掉双引号

Answer 5

OpenDialog1.Files.text，替换#13#10也可以

Answer 6

再问个问题，如果EDIT2要显示所选文件的路径 ‘c:\’，这个又是用哪个属性？