Добавлена возможность множественного выбора файлов при использовании TOpenDialog

Пример использования:

var
  OD: TOpenDialog;
begin
  OD := TOpenDialog.Create(Application);
  try
    OD.Filter := 'Text files (*.txt)|*.TXT|';
    OD.Options := OD.Options + ofAllowMultiSelect;

    if OD.Execute then
      ShowMessage(OD.Files.Text);
  finally
    OD.Free;
  end;
end;