Delphi. Учимся на примерах
2005 г.
Отрывок из книги
else ShowMessage('Файл не был открыт'); end; При нажатии кнопки Обзор открывается диалоговое окно выбора файла (Open1.Execute). Если в этом окне пользователь нажал кнопку Отмена (Open1.Execute = False), то сообщаем ему об этом и не выполняем никаких действий. Если пользователь выбрал файл, то копируем путь к нему в соответствующее поле ввода. Создадим аналогичный обработчик события для выбора пути назначения при копировании первого файла (кнопке Button3 соответствует поле where):
procedure TForm1.Button3Click(Sender : TObject); begin if Save1.Execute then where.Text:= Save1.FileName else ShowMessage('Вы не выбрали место длясохранения файла!'); end; Здесь выполняется та же проверка, что и в предыдущем случае. Затем выбранный путь заносится в соответствующее поле ввода, чтобы его, при желании, можно было откорректировать.
Комментарии:
Популярные книги
Довлатов. Сонный лекарь
1. Не вывожу
Фантастика
:альтернативная история
,аниме
.
5.00
рейтинг книги
Хозяйка забытой усадьбы
5. Королевская охота
Любовные романы
:любовно-фантастические романы
.
5.00
рейтинг книги
Точка Бифуркации
1. ТБ
Фантастика
:боевая фантастика
.
7.33
рейтинг книги
Кодекс Охотника. Книга XVII
17. Кодекс Охотника
Фантастика
:фэнтези
,попаданцы
,аниме
.
5.00
рейтинг книги
Идеальный мир для Лекаря 21
21. Лекарь
Фантастика
:фэнтези
,юмористическое фэнтези
,аниме
.
5.00
рейтинг книги
Хозяин Теней 5
5. Безбожник
Фантастика
:аниме
,фэнтези
,фантастика: прочее
,попаданцы
.
5.00
рейтинг книги
Роза ветров
6. Артефактор
Фантастика
:городское фэнтези
,аниме
,фэнтези
.
5.00
рейтинг книги
Локки 7. Потомок бога
7. Локки
Фантастика
:аниме
,эпическая фантастика
,фэнтези
.
5.00
рейтинг книги
Барон диктует правила
4. Закон сильного
Фантастика
:фэнтези
,попаданцы
,аниме
.
5.00
рейтинг книги
Индульгенция 1. Без права выбора
1. Темный сказ
Фантастика
:аниме
,фэнтези
,попаданцы
,гаремник
.
5.00
рейтинг книги
Великий род
3. Медорфенов
Фантастика
:юмористическое фэнтези
,попаданцы
,аниме
.
5.00
рейтинг книги
Идеальный мир для Лекаря 20
20. Лекарь
Фантастика
:фэнтези
,юмористическое фэнтези
,аниме
.
5.00
рейтинг книги
Мастер 3
3. Мастер
Фантастика
:героическая фантастика
,попаданцы
,аниме
.
5.00
рейтинг книги
Наследник и новый Новосиб
7. Десять Принцев Российской Империи
Фантастика
:городское фэнтези
,попаданцы
,аниме
.
5.00
рейтинг книги
Имперец. Том 4
3. Имперец
Фантастика
:попаданцы
,альтернативная история
,аниме
.
5.00
рейтинг книги
Солнечный корт
4. Все ради игры
Фантастика
:зарубежная фантастика
.
5.00
рейтинг книги
Черный Маг Императора 13
13. Черный маг императора
Фантастика
:попаданцы
,аниме
,сказочная фантастика
,фэнтези
.
5.00