Главная Случайная страница


Полезное:

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


Категории:

АрхитектураАстрономияБиологияГеографияГеологияИнформатикаИскусствоИсторияКулинарияКультураМаркетингМатематикаМедицинаМенеджментОхрана трудаПравоПроизводствоПсихологияРелигияСоциологияСпортТехникаФизикаФилософияХимияЭкологияЭкономикаЭлектроника






Базы данных с файл-серверной архитектурой





При создании приложении с локальными базами данных в DELPHI чаще всего используют механизм BDE и технологию ADO.

Пример создания локальной базы данных. Технология ADO

В качестве СУБД удобнее всего использовать Access 97.

1. Создаем при помощи MS Access базу данных с тремя таблицами: "Потребитель", «Продукты» и "Потребительская корзина".

Potreb (поля: KodPotreb, NamePotreb) – первичный ключ поле KodPotreb,

Product (KodProduct, Product) – первичный ключ поле KodProduct,

PotrKorzina(поля: KodPotreb, KodProduct, Kolvo).

Рекомендуется с помощью схемы данных создать связи между таблицами с проверкой ссылочной целостности.

2. Создаем новое приложение в Delphi (модуль Unit1).

3. Создаем модуль данных (File/New/Data Module, при этом создается Unit2) и размещаем на нем объекты:

ADOConnection и по три экземпляра ADOTable и DataSourсe.

4. Для ADOConnection устанавливаем свойство ConnectionString при помощи диалога (нажать кнопку «Build», на закладке Provider выбрать Microsoft Jet 4.0 OLE DB Provider, на закладке Connection указать путь к базе данных, созданной в Access, нажать «Test Connection», а затем «ОК», «ОК»). Свойство LoginPrompt устанавливаем в false, чтобы каждый раз не запрашивалось имя пользователя и пароль.

5. Для объектов ADOTable настраиваем следующие свойства:

Для ADOTable1 установить

Свойство Значение
Connection ADOConnection1
TableName Potreb
Active True

Для ADOTable2 установить

Свойство Значение
Connection ADOConnection1
TableName Product
Active True

Для ADOTable3 установить

Свойство Значение
Connection ADOConnection1
TableName PotrKorzina
Active True

6. Для объектов DataSource настроить свойства:

Свойство Значение
DataSet ADOTable1, ADOTable2 или ADOTable3

7. На форме размещаем по три объекта Label, DBGrid и DBNavigator.

8. Прописываем в модуле Unit1 в разделе uses модуль Unit2, чтобы иметь доступ к невизуальным компонентам.

9. Для компонентов DBGrid и DBNavigator устанавливаем свойства:

Свойство Значение
DataSource DataModule2.DataSource1, DataModule2.DataSource2 или DataModule2.DataSource3

10. Запускаем приложение. Внешний вид формы работающего приложения показан на рис 8.1.

 

Рис. 8.1 Пример приложения с локальной БД. Технология ADO

 

Русские заголовки полей таблицы устанавливаются через объект DBGrid – сначала через его контекстное меню создаются свойства столбцов, потом через таблицу свойств его столбцов раскрывается и устанавливается свойство Title.

При вводе данных в таблицу «Потребительская корзина» рекомендуется пользоваться компонентами, позволяющими использовать подстановки из справочных таблиц, например DBLookUpComboBox в сочетании с DBEdit.

Если в приложении предполагается учитывать связь между таблицами (в том числе при отображении информации) необходимо установить дополнительные свойства, например:

Объект Свойство Значение
ADOTable3 MasterSource DataSource1
  MasterField Установка параметров связи таблиц

При работе с базой данных через SQL запрос, набор данных создается с помощью объекта ADOQuery, свойства которого заполняются следующим образом:

Объект Свойство Значение
ADOQuery1 Connection Connection1
  SQL Текст SQL запроса
  Active True

При работе через SQL объект DataSource настраивается на объект ADOQuery. Объекты DBGrid и DBNavigator настраиваются таким же образом, как и при работе с отдельной таблицей.

 

Date: 2016-07-25; view: 351; Нарушение авторских прав; Помощь в написании работы --> СЮДА...



mydocx.ru - 2015-2024 year. (0.01 sec.) Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав - Пожаловаться на публикацию