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; Здесь выполняется та же проверка, что и в предыдущем случае. Затем выбранный путь заносится в соответствующее поле ввода, чтобы его, при желании, можно было откорректировать.
Комментарии:
Популярные книги
Тринадцатый
Фантастика
:фэнтези
,рпг
.
7.12
рейтинг книги
Родословная. Том 1
1. Линия крови
Фантастика
:городское фэнтези
,аниме
,фэнтези
,фантастика: прочее
.
5.00
рейтинг книги
Тринадцатый XI
11. Видящий смерть
Фантастика
:попаданцы
,аниме
,фэнтези
,фантастика: прочее
.
5.00
рейтинг книги
Сокрушитель
3. Уникум
Фантастика
:боевая фантастика
.
5.60
рейтинг книги
Хозяин Стужи 2
2. Злой Лед
Фантастика
:аниме
,фэнтези
,попаданцы
.
5.75
рейтинг книги
Искатель 2
2. Валинор
Фантастика
:фэнтези
,попаданцы
,рпг
.
5.00
рейтинг книги
Газлайтер. Том 2
2. История Телепата
Фантастика
:попаданцы
,альтернативная история
,аниме
.
5.00
рейтинг книги
Бастард Императора. Том 12
12. Бастард Императора
Фантастика
:попаданцы
,аниме
,фэнтези
,фантастика: прочее
.
5.00
рейтинг книги
Наследие Маозари 6
6. Наследие Маозари
Фантастика
:попаданцы
,постапокалипсис
,рпг
,фэнтези
,эпическая фантастика
.
5.00
рейтинг книги
Законы Рода. Том 4
4. Граф Берестьев
Фантастика
:юмористическое фэнтези
,аниме
.
5.00
рейтинг книги
Зодчий. Книга II
2. Зодчий Империи
Фантастика
:аниме
,фэнтези
,попаданцы
.
5.00
рейтинг книги
Последний рейд
5. Медорфенов
Фантастика
:фэнтези
,аниме
.
5.00
рейтинг книги
Локки 9. Потомок бога
9. Локки
Фантастика
:фэнтези
,попаданцы
,героическая фантастика
,боевая фантастика
.
5.00
рейтинг книги
Газлайтер. Том 3
3. История Телепата
Фантастика
:попаданцы
,альтернативная история
,аниме
.
5.00
рейтинг книги
Рядовой. Назад в СССР. Книга 1
1. Второй шанс
Фантастика
:попаданцы
,альтернативная история
.
5.00
рейтинг книги
Черный Маг Императора 17
17. Черный маг императора
Фантастика
:юмористическое фэнтези
,попаданцы
,аниме
,фэнтези
,фантастика: прочее
.
5.00
рейтинг книги
Чужая семья генерала драконов
6. Генералы драконов
Фантастика
:фэнтези
.
5.00