- •Технології проектування баз даних в delphi
- •6.051001 - Метрологія та інформаційно-вимірювальні технології
- •Технології проектування баз даних в delphi
- •6.051001 - Метрологія та інформаційно-вимірювальні технології
- •1Введение
- •2Введение в базы данных
- •2.1Типы субд
- •2.2Стандарт odbc
- •2.3Технологии взаимодействия delphi с бд
- •2.3.1Особенности технологии bde
- •2.3.2Особенности технологии ado
- •2.4Таблицы бд и связи между ними
- •2.5Первичные ключи и индексы
- •2.6Демонстрационная бд "поставщик книг"
- •3Использование odbc для подключения источника данных. Псевдонимы бд
- •3.1Внешний и внутренний псевдонимы бд
- •3.1.1Создание внешнего псевдонима
- •3.1.2Проверка работоспособности внешнего псевдонима в среде Delphi
- •3.2Внутренний псевдоним бд
- •3.2.1Назначение внутреннего псевдонима бд
- •3.2.2Создание внутреннего псевдонима
- •3.2.3Преимущества использования внутреннего псевдонима и проблемы перехода на другие субд
- •4Создание проекта с бд в технологии bde
- •4.1Особенности использования bde для соединения с источником данных
- •4.2Структура проекта с бд и визуальными компонентами
- •4.3Активизация проекта
- •4.4.4Компоненты tdbGrid
- •4.5Модуль данных
- •4.5.1Создание модуля данных tDataModule
- •4.5.2Связь модуля главного окна с модулем данных
- •4.5.3Создание компонента tDatabase
- •4.5.4Создание компонента tTable
- •4.5.5Создание компонента tDataSource
- •4.5.6Связь модуля главного окна с модулем данных
- •4.5.7Связь сетки tdbGrid и навигатора dbNavigator c источником данных tDataSource
- •4.5.8Связь главный-детальный между наборами данных
- •4.5.9Задание реляционной связи между наборами данных
- •4.5.10Активизация наборов данных
- •4.5.11Недостатки полученных решений и пути их устранения
- •4.6Объекты-столбцы сетки dbGrid
- •4.6.1Создание объектов-столбцов
- •4.6.2Редактирование объекта-столбца
- •4.7Объекты-поля наборов данных
- •4.7.1Назначение объектов-полей
- •4.7.2Создание объектов-полей
- •4.7.3Присоединение к наборам данных новых полей
- •4.7.4Присоединение полей из других таблиц. Подстановочные поля
- •4.7.5Вычисляемые поля
- •4.8Обработчики событий компонент работы с бд
- •4.8.1Обработчики событий OnGetText полей нд и компонента визуализации данных tdbGrid
- •4.8.2Установка системных переменных в обработчике событя OnCreate
- •4.9Бизнес-правила и обработчики событий компонент работы с бд
- •5Sql запросы к бд
- •5.1Компонент tQuery
- •5.2Создание компонента tQuery
- •5.3Использования компонента tQuery
- •5.3.1Свойство sql компонента tQuery
- •5.3.2Методы Open и ExecSql
- •5.3.3Схема программного формирования sql-запроса
- •5.3.4Параметрические запросы
- •5.3.5Параметрические запросы и свойство DataSource компонента tQuery
- •5.3.6Связь главный-детальный с компонентом tQuery в качестве детального набора данных
- •5.4Доступ к полям запроса
- •5.4.1Обращение к значению поля при помощи свойств объектов-полей Value и AsXxxx
- •5.4.2Обращение к значению поля при помощи свойств набора данных Fields и FieldValues
- •5.4.3Обращение к значению поля при помощи функции набора данных FieldByName
- •5.5Программный доступ к данным запроса
- •5.5.1Общая схема программного доступа к данным запроса
- •5.5.2Последовательная навигация по записям
- •5.6Обзор событий компонента tQuery
- •6Хранимые процедуры и триггеры
- •6.1Хранимые процедуры
- •6.2Создание хранимых процедур
- •6.3Вызов хранимых процедур
- •6.4Триггеры
- •7Наборы данных
- •7.1Обзор событий класса tdbDataSet
- •7.1.1Реализация каскадных изменений и бизнес-правил
- •7.1.2Другие события
- •8Технология ado
- •8.1Основные особенности технологии ado
- •8.2Реализация технологии ado в Delphi
- •8.3Создание проекта с бд в технологии ado. Установка связи с бд
- •8.3.1Создание модуля данных
- •8.3.2Начало настройки связи
- •8.3.3Выбор провайдера
- •8.3.4Настройка провайдера
- •8.3.5Настройка провайдера Microsoft Jet 4.0 ole db Provider
- •8.3.6Настройка провайдера Microsoft ole db Provider for odbc Drivers
- •8.3.7Завершение настройки связи
- •8.3.8Настройка оставшихся компонент модуля данных
- •8.4Особенности использования компонентов ado
- •8.4.1Базовые объекты ado
- •8.4.2Объект Recordset
- •8.4.3Объект Command
- •8.4.8Связной компонент tadoConnection
- •8.4.9Компонент tadoCommand
- •8.5Свойства, методы и события ado компонентов-наборов
- •8.5.1Общие свойства с bde-компонентами
- •8.5.2Специфические свойства
- •8.5.3Методы класса tCustomAdoDataSet
- •8.5.4События класса tCustomAdoDataSet
- •8.6Компонент tadoDataSet
- •8.7Компонент tadoTable
- •8.8Компонент tadoQuery
- •9Компоненты визуализации данных в Delphi
- •9.1Компонент tdbGrid
- •9.1.1Свойства
- •9.1.2Дополнительные возможности сетки
- •9.2Компоненты визуализации полей текущей записи
- •9.2.1Компонент tdbText
- •9.2.2Компонент tdbEdit
- •9.2.3Компонент tdbCheckBox
- •9.2.4Компонент tdbRadioGroup
- •9.2.5Списочные компоненты
- •9.2.6Компонент tdbMemo
- •9.2.7Компонент tdbRichEdit
- •9.2.8Компонент tdbCtrlGrid
- •9.2.9Компонент tdbNavigator
- •Приложение 2. Бд "поставщик книг"
- •Рекомендованная литература
5.4Доступ к полям запроса
Доступ к полям запроса является частным случаем доступа к значению поля НД.
К полю НД можно обратиться при помощи 3-х способов:
Свойств объектов-полей Value и AsXXXX;
Функции набора данных FieldByName;
Свойств набора данных Fields и FieldValues;
Эти способы порождают 5-ть вариантов, которые рассматриваются ниже.
5.4.1Обращение к значению поля при помощи свойств объектов-полей Value и AsXxxx
Объекты-поля предоставляют наиболее удобные средства Delphi по доступу к данным отдельных полей НД. В проектах Delphi рекомендуется в первую очередь использовать именно этот способ.
Примечание. Признаком хорошего тона является создание в проектах Delphi объектов-полей для всех полей запроса.
Если для поля НД определен объект-поле, получить в программе доступ к соответствующему полю НД можно по имени его объекта-поля.
Пусть создан запрос quBooks
SELECT Bookld, BName, BYear
FROM BOOKS
и все его объекты-поля BooksBookld, BooksBName и BooksBYear.
В начале покажем, как можно обратиться к значению объекта-поля при помощи свойства Value.
Примечание. Этот способ менее универсальный, чем использование свойства AsXXXX.
В таблице 4.4 перечислены типы значений, возвращаемых свойством Value объекта-поля:
property Value: variant;
Таблица 4.4 - Типы значений, возвращаемых компонентами в свойстве Value
Тип |
Компонент |
variant |
Все компоненты |
string |
TField, TBlobField |
longInt |
TAutoIncField, TIntegerField, TSmallintFietd, TWordField |
double |
TBCDField, TCurrencyField, TFloatField |
boolean |
TBooleanField |
TDateTime |
TDateField, TDateTimeField, TTimeField |
Например, если BooksBookID – объект-поле типа TAutoIncField, то его свойство Value возвращает значение типа longInt и в результате возможно выражение с автоматическим преобразованием типов от longInt к String:
Edit1.Text := quBooksBookID.Value
Теперь покажем, как можно обратиться к значению объекта-поля при помощи свойств AsXXXX, которые явно выполняют приведение типов полей, например integer к String. Это наиболее часто используемый способ обращения к значению объекта-поля.
Для приведения типов полей определены следующие свойства AsXXXX объекта-поля:
property AsBoolean: boolean;
property AsCurrency: currency;
property AsDateTime: TDateTime;
property AsFloat: double;
property Aslnteger; integer;
property AsString: string;
property AsVariant: variant;
Каждое из этих свойств приводит значение поля к соответствующему типу данных, указанному в названии свойства. Например, если BooksBookID - поле TAutoIncField, для приведения его к типу string нужно воспользоваться свойством AsString:
Edit1.Text := quBooksBookID.AsString;
Разумеется, тип поля должен быть совместимым с типом данных, к которому приводится значение поля. Например, если MoveSumma - поле TCurrencyField, попытка привести его к несовместимому типу boolean приведет к ошибке.
5.4.2Обращение к значению поля при помощи свойств набора данных Fields и FieldValues
Если для НД не создан ни один объект-поле, получить доступ к значению поля НД можно через свойства этого набора Fields и FieldValues:
property Fields[Index]: TField
property FieldValues['Имя_поля']: variant
Примечание. Этот метод можно применять и при наличии объектов-полей.
Тип возвращаемого значения поля может быть преобразован с помощью свойства AsXXXX.
Свойство Fields[Index] требует указания порядкового номера поля в списке полей НД. Нумерация полей в свойстве Fields начинается с 0. В приведенном примере запроса quBooks поле 'BYear' является 2-ым по счету, начиная с 0.
Edit1.Text := quBooks.Fields[1].AsString;
Свойство FieldValues['Имя_поля'] требует указания имени поля в НД, заключенного в одинарные кавычки. Следует подчеркнуть, что свойство FieldValues является умалчиваемым свойством для НД. Поэтому следующие обращения идентичны:
Edit1.Text := quBooks['BYear'];
Edit1.Text := quBooks.FieldValues['BYear'];
