4.5.2Связь модуля главного окна с модулем данных
Компоненты, работы с данными, которые далее будут помещены в модуль данных, должны быть доступны компонетам модуля главного окна. Для этого необходимо связать модуль главного окна с модулем данных.
Связь модуля главного окна с модулем данных выполняется при активном главном окне. Если вы находитесь в модуле данных или его окне, то перейдите к главному окну программы (щелкните на вкладке fmNaklsU в окне кода и нажмите клавишу F12). С помощью команды File>Use Unit (Рисунок 3 .20) свяжите модуль главного окна fmNaklsU с модулем данных dmNaklsU.
Рисунок 3.20 - Связь модуля главного окна с модулем данных
Примечание. В данном случае связь модуля главного окна с модулем данных выполнена еще до заполнения модуля данных. Но эту связь можно задать и после заполнения модуля данных.
4.5.3Создание компонента tDatabase
Для связи таблиц программы (5-ть компонентов TTable) с таблицами БД воспользуемся компонентом TDatabase на вкладке BDE палитры компонентов Delphi.
Щелкните на компоненте TDatabase, а затем - на имени модуля DM в окне дерева объектов. В окне дерева объектов слева от компонента TDatabase появится красный знак вопроса, означающий, что компонент TDatabase еще не готов к работе.
Рисунок 3.21 – Компонент TDatabase не готов к работе
В окне инспектора объектов раскройте список свойства AliasName (имя пседонима) и выберите созданный ранее псевдоним БД, например BiblDataPgSQL. В строке свойства DatabaseName напишите произвольное имя например, BblDat, так называемого локального псевдонима приложения, который создает компонент TDatabase. Использование в программе локального псевдонима приложения является средством BDE обеспечения независимости текста программы от имени БД. Локальный псевдоним приложения доступен только в той программе, в которой используется компонент TDatabase.
В поле Name компонента TDatabase задайте имя DB.
Рисунок 3.22 – Окно инспектора объектов компонента DB
После определения псевдонима БД на уровне BDE и создания локального псевдонима БД для создаваемой программы исчезнет красный знак вопроса слева от компонента в окне дерева объектов, что свидетельствует о готовности компонента к работе.
Рисунок 3.23 - Окно дерева объектов модуля DM и компонента DB
Компонент TDatabase выполняет множество полезных функций, обеспечивающих связь программы с БД. В локальных и клиент-серверных системах только с его помощью можно реализовать транзакции - специальный механизм доступа к данным, повышающий их достоверность и непротиворечивость. Кроме того он способен передать серверу БД имя пользователя, его пароль и ряд других параметров, оптимизирующих связь с сервером и избавляющих пользователя программы от обязательной регистрации на сервере.
4.5.4Создание компонента tTable
Создание компонента TTable может быть выполнено одним из 2-х способов:
Для создания компонента TTable (вкладка BDE) откройте вкладку BDE и щелкните на изображении таблицы TTable, а затем щелкните на псевдониме BiblData в окне дерева объектов.
Слева от компонента в окне дерева объектов появится красный знак вопроса, означающий, что компонент TTable еще не готов к работе.
Рисунок 3.24 – Окно дерева объектов после вставки новой таблицы
Внимание! В окне инспектора объектов в свойстве DatabaseName нового компонента TTable автоматически появится имя локального псевдонима BiblData.
Рисунок 3.25 – Окно инспектора объектов для таблицы tbNakls
Для этого щелкните на компоненте TTable, а затем щелкните непосредственно в окне модуля данных DM. В результате в этом окне появится новый компонент TTable (Рисунок 3 .24). Но в этом случае необходимо самому заполнить свойство DatabaseName компонента TTable (Рисунок 3 .25).
Компонент TTable является набором данных (НД). Он преимущественно используется в файл-серверных системах для доступа к данным из какой-либо одной таблицы БД, когда таблица полностью копируется на машину клиента и там обрабатывается.
Примечание. Имеет смысл называть имена НД именами связанных с ними таблиц физической БД с соответствующим префиксом. Например, для таблицы NAKLS физической БД имя компонента TTable следует дополнить префиксом tbNakls (Рисунок 3 .26).
Рисунок 3.26 – Имя таблицы
После определения имени НД исчезнет красный знак вопроса слева от компонента в окне дерева объектов, что свидетельствует о готовности компонента к работе (Рисунок 3 .27).
Рисунок 3.27 – Окно дерева объектов после определения имени НД
Нами компонент TTable будет использован для создания первого варианта программного проекта с клиент-серверной системой, который затем будет модифицирован и вместо компонента TTable будет использован более универсальный компонент TQuery, с помощью которого формирутся SQL-запросы (см. раздел 8).
Чтобы подготовить компонент TTable к работе, необходимо определить имя соответствующей таблицы. Для этого раскройте список его свойства TableName.
Рисунок 3.28 – Свойство TableName
На экране появится окно входа в БД с локальным псевдонимом BiblData (Рисунок 3 .29).
Рисунок 3.29 – Окно входа в БД с локальным псевдонимом BiblData
Введите пароль и логин и нажмите кнопку OK. Получим список доступных таблиц БД (Рисунок 3 .30).
В окне инспектора объектов выберите таблицу NAKLS обрабатываемой БД.
Рисунок 3.30 – список доступных таблиц БД
Примечание. При создании первых проектов, во избежание неясностей, для определяемых наборов данных рекомендуется сразу в поле Active задавать True.
Рисунок 3.31 – Окно инспектора объектов для таблицы tbNakls с Active=True