1.1.2 Пр2 Создание и использование модуля данных
Цель: научиться создавать и использовать модуль данных.
1. Создать модуль данных;
2. Добавить в модуль данных все таблицы БД.
3. Создать автоматическое подключение к БД.
4. Сохранить проект.
Теоретические сведения
Использование компонента tMainMenu
Откройте созданный проект. Создайте новую форму командой File → New → Form.
Измените следующие свойства пустой формы, заданные по умолчанию:
Caption – указывается заголовок формы (например, «База данных Аэропорт»;
Name – указывается имя формы (например, «Main»).
Поместите на форму компонент TMainMenu (компонент расположен на панели Standart).
2. Использование компонентов tdbGrid, Tрanel, TbitBtn
Создайте новую форму. Задайте заголовок и имя формы.Поместите на форму панель Tpanel (компонент расположен на панели Standart), установите значение alBottom в свойстве Align. Очистите свойство Caption. Поместите на форму компонент PageControl (панель Win32), установите значение alClient. Добавьте новую страницу (с помощью контекстного меню). Задайте имя страницы.Чтобы пользователь программы мог менять высоту панелей, поместите на форму вешку разбивки Tsplitte г (панель Additional), в ее свойство Align поместите значение alBottom, в свойство Beveled – True, и в свойство Height – 5. Поместите на верхнюю панель компонент TDBGrid (панель Data Controls) и в свойстве Align установите значение alClient. Поместите на нижнею панель кнопку TbitBtn (вкладка Additional). В свойство Kind кнопки поместите значение bkClose. С помощью команды File → Use Unit (Alt+F11) свяжите модуль главного окна с модулем данных. Для верхней сетки DBGridl раскройте список свойства DataSource и выберите в нем необходимый источник данных, сетка тут же наполнится данными из выбранной таблицы.
Вид окна к этому моменту:
1.2 Тема: Проектирование серверной части приложения бд
1.2.1 Пр3 Создание и использование подстановочных полей (Lookup)
Цель: научиться создавать и использовать подстановочные поля (Lookup)
Открываем окно модуля данных, дважды щелкаем по компоненту FoodT, чтобы открыть редактор полей. В этом редакторе у нас уже присутствуют пять полей, имеющихся в таблице, добавим шестое, подстановочное. Для этого щелкните правой кнопкой по редактору полей и выберите команду New Field (Новое поле):
В разделе Field type (Тип поля) вы можете выбрать один из трех вариантов. Нас сейчас интересует тип Lookup. Заполните необходимые поля значениями, как на рисунке 6.1 и нажмите кнопку "ОК". Новое подстановочное поле будет добавлено в набор данных. В списке полей его можно переместить мышью на другое место, установите его сразу под FName. Перейдите на окно главной формы и убедитесь, что новое поле появилось. Однако оно пока еще не содержит данных - данные будут доступны только во время прогона программы. Сохраните проект, скомпилируйте и посмотрите, как работает программа. Как мы видим, теперь на главной форме два поля, которые ни к чему показывать пользователю - FKey с номерами записей, и FType - с номерами типов блюд, которые нам уже не нужны, поскольку мы показываем сами типы. Уберем их, точнее, сделаем невидимыми. Снова откройте редактор полей набора данных FoodT. Установите свойство Visible этих полей в False.