Opendialog Multiselect

[dataspider]

Hi,

Delphi-Quellcode:

if OpenDialog.Execute then 
begin 
  for I := 0 to OpenDialog.Files.Count - 1 do 
  begin 
    ShowMessage(OpenDialog.Files[i]); 
    // oder
    Memo1.Lines.Add(OpenDialog.Files[i]);
  end; 
end;

Meinst du das?

Frank