Создание модуля данных
Модуль данных содержит объекты, связанные с базой, и используется для централизованного управления этими объектами. Его создание производится командой File/New/Data Module (рис. 3.3.1). Имя созданного модуля данных лучше сохранить для наглядности под новым именем, например: DataModulStroiki. Разместим компонент Table с панели Data Access на странице Components (рис. 3.3.1) и выделим его. Зададим свойства: DataBaseName=Stroiki (псевдоним базы), TableName=Stroiki (имя таблицы), Name=Stroiki (имя компонента приравняем имени таблицы для наглядности), Active=True (чтобы можно было обращаться к таблице из программы). Аналогично сделаем для двух оставшихся таблиц. Далее разместим компонент Data Source (источник данных) и выделим его. Зададим свойства: DataSet=Stroiki (имя таблицы) (п.3.4.2), Name=Sourcestroiki (имя компонента).
Рис. 3.3.1. Окно модуля данных
То же проделаем и c другими таблицами. Получим модуль (рис.3.3.1). Источник данных служит посредником между таблицей базы и экранными формами, что позволяет переходить на другие СУБД, меняя только настройку компонента ‑ источника данных, а не программы. После открытия проекта нужно вызвать этот модуль командой View/Units/Unit2.
Поля в таблице можно использовать как динамические (dynamic) либо как постоянные (persistent). Динамические полядолжны быть в таблице, и их можно редактировать. Постоянные поля(виртуальные или псевдополя) могут отсутствовать в таблице, и их значения вычисляются. К имени постоянного поля автоматически добавляется имя компонента Table. Для примера все поля таблицы строек сделаем постоянными и добавим псевдополе Os (Os=Ss‑Fs). Для этого щелкнем правой кнопкой мыши на таблице Stroiki в окне модуля данных и выберем команду Field Editor (редактор полей), появится пустое окнo DataModule2.Stroiki. Из контекстного меню этого окна выберем команду Add all fields (добавить все поля). Командой New Field вызовем окно для формирования вычисляемого (Calculated) псевдополя Os типа Сurrency. Составим процедуру обработки события OnCalcFields(п. 3.4.1) таблицы Stroiki для вычисления значения (свойство Value) псевдополя Os:
Procedure TDataModule2.StroikiCalcFields(DataSet: TDataSet);
Begin StroikiOs.Value:=StroikiSs.Value‑StroikiFs.Value; End;
При ссылках на объекты модуля данных объект уточняется именем модуля DataModule2 (DataModule2.SourceStroiki).
Рекомендуется для всех полей задавать словесные наименования полей в их свойствах DisplayLabel через редактор полей, которые выводятся в формах и компонентах вместо латинских имен полей.
Рекомендуется модуль базы данных создавать под содержательным именем в папке с базой, включать его в новый проект командой Project/Add to project и подключать его к головному или другому модулю командой File/Use Unit.
Дата добавления: 2016-03-22; просмотров: 596;