delphi的opendialog选中多个文件问题

delphi的opendialog选中多个文件问题

for i := 0 to OpenDialog.Files.Count-1 do
memo.line.add(ExtractFileName(OpenDialogs.Files.string[i]));

随手写的，大概就这么个意思，自己整理

竖着排不知道哟.
不过前面的还只到
首先OpenDialog的options属性把allowMutilSelect设置成true
然后
if dlgOpen1.Execute then
begin
try
for I := 0 to dlgOpen1.Files.Count - 1 do
begin
memo1.Lines.Append(extractfilename(dlgOpen1.Files[i]));