IFileOpenDialog.MultiSelect

Синтаксис

MultiSelect: Boolean;

Описание

Свойство MultiSelect определяет возможность множественного выбора файлов в диалоговом окне.

Комментарии

Если свойству MultiSelect установить значение True, то при использовании клавиш Shift или Ctrl можно отметить несколько файлов диалогового окна.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1» и компонента FileOpenDialog с наименованием «FileOpenDialog1».

Sub Button1OnClick(Sender: Object; Args: IEventArgs);
Var
    FileStr: IFileStream;
Begin
    FileOpenDialog1.MultiSelect := False;
    FileOpenDialog1.ShowReadOnly := True;
    FileOpenDialog1.ReadOnlyChecked := True;
    If FileOpenDialog1.Execute Then
        If FileOpenDialog1.ReadOnlyChecked Then
            FileStr := File.Open(FileOpenDialog1.FileName, FileOpenMode.Read, FileShare.DenyNone);
            //...
        Else
            FileStr := File.Open(FileOpenDialog1.FileName, FileOpenMode.ReadWrite, FileShare.Exclusive);
            //...
        End If;
        Dispose FileStr;
    End If;
End Sub Button1OnClick;

При нажатии на кнопку будет инициализирован диалог открытия файла. При инициализации диалога в нём будет присутствовать флажок «Только чтение». Флажок будет отмечен. Будет доступен выбор только одного файла. При выборе файла и нажатия кнопки «OK», в зависимости от состояния флажка «Только чтение», данный файл будет открыт только на чтение, либо с возможностью записи и запретом доступа к данному файлу из других приложений.

См. также:

IFileOpenDialog