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; Здесь выполняется та же проверка, что и в предыдущем случае. Затем выбранный путь заносится в соответствующее поле ввода, чтобы его, при желании, можно было откорректировать.
Комментарии:
Популярные книги
Первый среди равных. Книга XII
12. Первый среди Равных
Фантастика
:аниме
,фэнтези
,фантастика: прочее
,попаданцы
.
5.00
рейтинг книги
Жена неверного ректора Полицейской академии
Любовные романы
:любовно-фантастические романы
.
4.25
рейтинг книги
Вперед в прошлое!
1. Вперед в прошлое
Фантастика
:попаданцы
.
5.00
рейтинг книги
#Бояръ-Аниме. Газлайтер. Том 11
11. История Телепата
Фантастика
:фэнтези
,попаданцы
,аниме
.
5.00
рейтинг книги
Законы Рода. Том 10
10. Граф Берестьев
Фантастика
:юмористическая фантастика
,аниме
,фэнтези
.
5.00
рейтинг книги
Черный Маг Императора 15
15. Черный маг императора
Фантастика
:юмористическое фэнтези
,попаданцы
,аниме
,сказочная фантастика
,фэнтези
,фантастика: прочее
.
5.00
рейтинг книги
Старый, но крепкий 7
7. Культивация без насилия
Фантастика
:рпг
,уся
,фэнтези
.
5.00
рейтинг книги
Адвокат Империи 4
4. Адвокат империи
Фантастика
:городское фэнтези
,аниме
,дорама
,фэнтези
,фантастика: прочее
,попаданцы
.
5.25
рейтинг книги
Гримуар темного лорда III
3. Гримуар темного лорда
Фантастика
:фэнтези
,попаданцы
,аниме
.
5.25
рейтинг книги
Темная сторона. Том 2
10. Гибрид
Фантастика
:технофэнтези
,аниме
,фэнтези
,попаданцы
.
5.00
рейтинг книги
Старый, но крепкий 2
2. Культивация без насилия
Фантастика
:рпг
,уся
,эпическая фантастика
.
5.00
рейтинг книги
Вечная Война. Книга II
2. Вечная война.
Фантастика
:юмористическая фантастика
,космическая фантастика
.
8.37
рейтинг книги
Я снова князь. Книга XXIII
23. Дорогой барон!
Фантастика
:юмористическое фэнтези
,аниме
,попаданцы
.
5.00
рейтинг книги
Студиозус 2
4. Светлая Тьма
Фантастика
:юмористическое фэнтези
,городское фэнтези
,аниме
.
6.25
рейтинг книги
Лекарь Империи 8
8. Лекарь Империи
Фантастика
:попаданцы
,городское фэнтези
,аниме
.
5.00
рейтинг книги
Некромант
4. Петр Синельников
Фантастика
:боевая фантастика
.
6.20
рейтинг книги
Последний реанорец. Том X
9. Высшая Речь
Фантастика
:фэнтези
,попаданцы
,аниме
.
5.00