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; Здесь выполняется та же проверка, что и в предыдущем случае. Затем выбранный путь заносится в соответствующее поле ввода, чтобы его, при желании, можно было откорректировать.
Комментарии:
Популярные книги
Шайтан Иван 4
4. Шайтан Иван
Фантастика
:попаданцы
,альтернативная история
.
8.00
рейтинг книги
Ликвидатор на службе Империи. Том 5. Финал
5. Ликвидатор на службе Империи
Фантастика
:аниме
.
5.00
рейтинг книги
Черный маг императора
1. Черный маг императора
Фантастика
:юмористическая фантастика
,попаданцы
,аниме
.
5.00
рейтинг книги
Вперед в прошлое 3
3. Вперёд в прошлое
Фантастика
:попаданцы
,альтернативная история
.
5.00
рейтинг книги
Боярышня Евдокия
3. Боярышня
Фантастика
:попаданцы
,альтернативная история
.
5.00
рейтинг книги
Кукловод
2. О чем молчат могилы
Фантастика
:боевая фантастика
.
8.50
рейтинг книги
Рядовой. Назад в СССР. Книга 1
1. Второй шанс
Фантастика
:попаданцы
,альтернативная история
.
5.00
рейтинг книги
Доктор 4
4. Доктор
Фантастика
:альтернативная история
.
5.00
рейтинг книги
Япона осень
6. Антикризисный Актив
Фантастика
:героическая фантастика
,попаданцы
.
5.00
рейтинг книги
Потомок бога 3
3. Локки
Фантастика
:аниме
,фэнтези
.
5.00
рейтинг книги
Газлайтер. Том 25
25. История Телепата
Фантастика
:боевая фантастика
,попаданцы
,аниме
.
5.00
рейтинг книги
Идеальный мир для Лекаря 22
22. Лекарь
Фантастика
:юмористическое фэнтези
,аниме
,фэнтези
.
5.00
рейтинг книги
Воронцов. Перезагрузка. Книга 2
2. Воронцов. Перезагрузка
Фантастика
:попаданцы
,альтернативная история
,фэнтези
.
5.00
рейтинг книги
Ликвидатор на службе Империи
1. Ликвидатор на службе Империи
Фантастика
:фэнтези
,аниме
.
5.00
рейтинг книги
Гримуар темного лорда III
3. Гримуар темного лорда
Фантастика
:фэнтези
,попаданцы
,аниме
.
5.00
рейтинг книги
Барон Дубов 2
2. Его Дубейшество
Фантастика
:юмористическое фэнтези
,аниме
,сказочная фантастика
,фэнтези
.
5.00
рейтинг книги
Виконт. Книга 3. Знамена Легиона
3. Псевдоним `Испанец`
Фантастика
:фэнтези
,попаданцы
,аниме
.
7.00