Execute: Boolean;
Метод Execute осуществляет инициализацию диалога и возвращает результат выбора пользователя.
Метод возвращает значение True, если была нажата кнопка Открыть/Сохранить, иначе - False. Если была нажата кнопка Открыть/Сохранить, то путь и наименование выбранного файла будут доступны в свойстве FileName и коллекции FileNames. Если для компонента FileOpenDialog включён режим множественного выбора файлов, то в свойстве FileNames будет содержаться информация обо всех выбранных файлах, а в свойстве FileName информация только о первом файле. Файлы в коллекции FileNames будут расположены в том порядке, в каком они отсортированы в диалоге.
Для выполнения примера предполагается наличие формы, расположенных на ней двух кнопок с наименованиями B_OPEN и B_SAVE и компонентов FileOpenDialog и FileSaveDialog с наименованиями FileOpenDialog1 и FileSaveDialog1 соответственно.
Class TESTForm: Form
Button1: Button;
Button2: Button;
FileOpenDialog1: FileOpenDialog;
FileSaveDialog1: FileSaveDialog;
Sub B_OPENOnClick(Sender: Object; Args: IMouseEventArgs);
Var
FileName: String;
Begin
FileOpenDialog1.MultiSelect := True;
If FileOpenDialog1.Execute Then
For Each FileName In FileOpenDialog1.FileNames Do
Debug.WriteLine(FileName);
End For;
End If;
End Sub B_OPENOnClick;
Sub B_SAVEOnClick(Sender: Object; Args: IMouseEventArgs);
Begin
If FileSaveDialog1.Execute Then
Debug.WriteLine(FileSaveDialog1.FileName);
End If;
End Sub B_SAVEOnClick;
End Class TESTForm;
При нажатии на кнопку B_OPEN будет инициализирован диалог открытия файлов, при нажатии кнопки B_SAVE - диалог сохранения в файл. При выборе файлов и нажатии в диалогах кнопок «Открыть/Сохранить» информация о файлах будет выведена в консоль среды разработки.
См. также: