Практическая работа № 6 1. Запустить Delphi.

Практическая работа № 6
Тема: Организация сохранения данных с помощью компонентов диалога с файлами.
1. Запустить Delphi.
2. Открыть проект с именем Project_3 (из папки PR_3)
3. Добавить в макет формы Fm_tovar дополнительные визуальные компоненты для работы
с файлами TsaveDialog, TopenDialog
свойство
Значение
(в палитре Dialogs) и две простые
Dlg_Open: TOpenDialog, Dlg_Save: TSaveDialog
кнопки
Расширение по
tov
4. Установить через окно Инспектора
умолчанию
Файловые
Все файлы (*.*)
объектов
следующие
значения
фильтры
Сведения о товаре (*.tov)
свойств для компонентов (см.
Номер фильтра по 2
таблицу)
умол-ю
5. Сохранить и запустить проект. Все
Заголовок окна
Открытие файла с данными о товаре
ли новые компоненты видны на
Сохранение данных о товаре в файл
Btn_Open, Btn_Save: TButton
экране, в каком порядке идет обход
Подпись
Открыть, Сохранить
клавишей TAB?
Вид
курсора
Ладошка
6. Самостоятельно настройте порядок
Текст подсказки
Выдача сведений о покупке
обхода, чтобы последней была
мыши
Выдача сведений о покупке
кнопка «Выход»
Доступность
Да
7. Для дальнейшего использования
создайте глобальные переменные:
 Файловая переменная для работы с текстовым файлом (file_tov: textfile)
 Полное имя файла (f_name: string)
8. Написать процедуру Сохранения данных в файл по нажатию кнопки «Сохранить» по
следующему сценарию:
 локальная переменная для работы элементом текстового файла (S: string)
 Имя файла по умолчанию для диалога установите как имя Товара (из Edt_Name)
 Выполните метод Вызова Окна Диалога Dlg_Save и, если нажата ОК:
 В переменную сохранить имя файла, выбранное в Диалоге
 Установить связь файловой переменной с файлом на диске
 Открыть файл для записи
 В переменную S записать имя Товара (из Edt_Name)
 Записать в файл значение S
 Аналогичным образом записать в файл через переменную S Цену, Количество,
Дату, Размер скидки, Номер единицы измерения, номер Категории
 Закрыть файл
9. Сохранить и запустить проект. Создайте каталог Товары. Введите и сохраните в файлах
данные о трех товарах (со скидкой, без скидки)? Проверьте все настройки, сделанные в
пункте 4. Просмотрите содержимое файлов через Блокнот
10. Самостоятельно написать процедуру Восстановления данных из файла по нажатию
кнопки «Открыть»
11. Сохранить и запустить проект. Откройте поочередно сохранные в файлах данные о трех
товарах (со скидкой, без скидки), при этом выполните Расчеты? Все ли данные из файла
отображаются верно?
12. Сохранить и запустите проект.
После выполнения практической работы студент должен знать:
1. Компоненты, которые были использованы в данной работе
2. Назначение и принадлежность к компонентам свойств: Items, ItemIndex, Caption, State,
Date, Lines, TabOrder, Cursor, Hint, ShowHint, DefaultExt, Filter, FilterIndex, InitialDir,
Title, FileName,
3. Назначение и принадлежность к компонентам методов: click, Execute
4. Назначение и принадлежность к компонентам событий: onclick,
5. Назначение и правила использования стандартных подпрограмм: str, val, trim, dateToStr,
StrTodate, assignFile, ReWrite, ReSet, writeln, Readln, CloseFile