4.1. Создание модуля данных

В приложении, работающем с демонстрационной БД, нам понадобятся шесть компонентов Table (по числу таблиц БД) и, соответственно, шесть компонентов DataSource, связанных с этими таблицами.

Создадим новый проект. Сохраним модуль главной формы (которую мы пока не изменяли) под именем fmMainUnit, а весь проект – под именем Sale. Добавим в проект модуль данных командой File > New > Data Module. В свойство Name модуля данных поместим значение DM и сохраним модуль в файле dmSaleUnit. Свяжем модуль с проектом командой Project > Add to Project и выберем только что созданный файл dmSaleUnit.

Теперь в модуле данных необходимо разместить компоненты, которые обеспечат доступ к таблицам БД. Дерево, описывающее логические связи между компонентами, можно просмотреть, выполнив команду View > Object TreeView.

Можно изменять положение объектов в этом дереве методом перетаскивания, а также добавлять к ним новые объекты.

С помощью правой кнопки мыши можно быстро получить доступ к основным свойствам каждого из элементов. Все они доступны также из контекстного меню объектов, расположенных в правой части окна.

Для связи таблиц с БД воспользуемся компонентом Database на вкладке BDE палитры компонентов: щелкнем на нем и затем – на имени модуля DM в окне дерева объектов. В окне инспектора объектов раскроем список свойства AliasName и выберем псевдоним Sale. В строке свойства DatabaseName укажем произвольное имя (например, ААА) так называемого локального псевдонима, который создает компонент Database.

Локальный псевдоним доступен только в той программе, в которой используется компонент Database. Этот компонент выполняет множество полезных функций, обеспечивающих связь программы с БД. Для файл-серверных систем только с его помощью можно реализовать транзакции – специальный механизм доступа к данным, повышающий их достоверность и непротиворечивость.

После определения псевдонима БД и создания локального псевдонима исчезнет красный знак вопроса слева от компонента в окне дерева объектов, что свидетельствует о готовности компонента к работе. Заменим заданное по умолчанию имя компонента Database1 на DB.

Перенесем в окно дерева объектов компонент Table (вкладка BDE) и «положим» его на псевдоним ААА. В окне инспектора объектов в свойстве DatabaseName нового компонента автоматически появится имя локального псевдонима ААА, однако слева от компонента в окне дерева объектов будет красный знак вопроса, означающий, что компонент Table еще не готов к работе.

Компонент Table является набором данных (НД). Он преимущественно используется в локальных и файл-серверных системах для доступа к данным из одной или нескольких таблиц БД.

Чтобы подготовить компонент к работе, необходимо определить имя таблицы: раскроем список свойства TableName и выберем в нем таблицу IZDELIE. Изменим его имя Table1, заданное по умолчанию, на имя связанной с ним таблицы: в строке свойства Name введем Izdelie. Чтобы к таблице можно было обращаться из программы, свойству Active надо присвоить значение True.

Т аким же образом надо добавить в модуль данных и наборы данных для остальных таблиц. Окно модуля данных примет вид, показанный на рис. 18.

Рис. 18. Добавление НД в модуль данных

Соответственно, в модуле данных надо подготовить шесть объектов DataSource, связать каждый из них со своим НД и дать им подходящие имена. Выделим компонент на вкладке Data Access палитры компонентов и затем щелкнем на компоненте Izdelie в окне дерева объектов, чтобы связать его с НД. Компонент может быть размещен и прямо в окне компонентов модуля данных. Тогда источник данных после размещения в модуле данных связывается с конкретным НД с помощью свойства DataSet. В процессе связывания источники данных будут перемещаться «вглубь» дерева, описывающего эти НД.

Заменим в строке свойства Name заданное по умолчанию имя DataSource1 на имя SourceIzd.

Т аким же образом подготовим остальные объекты. Вид модуля данных к этому моменту показан на рис. 19.

Рис. 19. Описание таблиц БД в качестве источников данных