Прак 6-new2

Практическая работа № 6
Тема: Организация доступа из приложения к Базе Данных
1. Скопируйте на личный диск файл Db_Shop.mdb. Откройте его и просмотрите структуру таблицы Tovar
(имена полей, типы, описание) и данные, которые там хранятся (сколько записей?). Закройте Access
2. Создать псевдоним для базы данных «Покупка товаров»:
 C:\WINDOWS\system32\odbccp32.cpl или Пуск/настройка/Панель управления/Админитстирование/Источники
данных (ODBC) (для ТПК Пуск\Программы\Программирование\Источник данных ODBC)
3.
4.
5.
6.
7.
8.
 Нажать на кнопку Add (Добавить), выбрать имя – Microsoft Access Driver – Готово;
 Ввести имя источника данных – aL_Shop, описание – Покупка товаров в магазине (Фамилия);
 Нажать на кнопку Выбрать, найти личную базу Db_Shop.mdb – Ok.
На личном диске создайте папку PR_4 (для сохранения всех файлов проекта).
Создать в среде Delphi новый проект и сохранить его с именем
Project_tovar, а форму с именем Unit_Red
DB_sklad: TDataBase
Добавить в проект модуль данных – File/New/DataModule. В результате Псевдоним
AL_Shop
появится окно DataModule2. Через окно инспектора объектов изменить имя Запрос пароля
нет
модуля данных на DM_Shop
Соединение
Да
Установить в коде проекта следующий порядок создания форм:
Tb_Tovar: TTable
 Модуль данных
Псевдоним
AL_Shop
 форма
Таблица
Tovar
Поместить в модуль данных компонент со страницы DataAccess и BDE (см. Доступ
Да
таблицу):
Ds_Tovar: TDataSource
Сохранить модуль данных с именем DM_Tovar.pas
Набор данных
Tb_Tovar
9. Перейти в окно формы. Установить
связь формы с модулем данных.
(File/Use Unit, DM_Tovar). Какие
изменения произошли при этом в окне
редактора кода формы? В месте
подключения
модуля
данных
допишите
соответствующие
комментарии
10. Изменить макет формы и разместите
на ней компоненты работы БД
(страница Standart и Data Controls).
Установите через окно Инспектора
объектов следующие значения свойств
компонентов:
Fm_Red: TForm
Подпись
Положение
Fm_Red
Номер товара
Db_Edt_Nom
Наименование
Db_Edt_Name
Дата выпуска
Db_Edt_date
Цена
Db_Edt_Cena
Количество
Db_Edt_Kol
Btn_Exit
Db_Nvg_Tovar
Изменение данных о товарах
Центр экрана
Btn_Exit: TButton
Подпись
Выход
Подсказка
Завершение работы
11. Для кнопки Btn_Exit создать процедуры закрытия формы
12. Сохранить все файлы проекта и запустить программу. С
помощью
навигатора
добавить
2
новые
записи,
отредактировать 1 запись, удалить 1 запись таблицы.
После выполнения работы студент должен:
Db_Edt_Nom, Db_Edt_Name, Db_Edt_date,
Db_Edt_Cena, Db_Edt_Kol: TDbEdit
Источник
Ds_Tovar
Поле
Id_tovar, Name_tovar,
Date_make, Cena, Kol
Db_Nvg_Tovar: TbdNavigator
Источник
Ds_Tovar
Подсказки
Полное название каждой
кнопки по-русски
уметь создавать псевдоним БД через ODBC
знать назначение модуля данных, уметь добавлять его в проект и подключать к форме
знать значение кнопок навигатора
знать назначение, место нахождение и применения компонентов Table, DataSourсe, TbEdit,
TDBMemo, TDBNavigator
5. знать назначение и принадлежность к компонентам свойств DataBaseName, TableName, Active,
DataSet, DataSource, DataField, Hints
1.
2.
3.
4.