怎样让opendialog可以多选文件

Question

可以吗？真的可以吗？难道真的可以吗》

Answer 1

设置ofallowmultiselect为true就可以多选了

Answer 2

你可以自己试一试，看一下就明白了，至于多选后的文件名可从
openpicturedialog1.Files.Text中拿到，把它showmessage出来，可以看出每一个文件名后都换了行，我以前做时就是按#13的位置判断是否一个文件名结束，然后通过copy拿文件名，不知道有没有简单点儿的方法.......

Answer 3

设置属性编辑器，options-->ofAllowMultiSelect 为true

Answer 4

哎，愚蠢了，刚才看了一下帮助，openpicturedialog1.Files是TStrings型的，郁闷。
这样就能拿到每一个名称了。
procedure TForm1.Button1Click(Sender: TObject);
var
  i: integer;
begin
  if openpicturedialog1.Execute then
  begin
    for i := 0 to openpicturedialog1.Files.Count - 1 do
      ShowMessage(openpicturedialog1.Files.Strings[i]);
  end;
end;