Иптышев А.А., Морозов Д.И., Городилов А.А., Иптышев М.А. Базы данных
Подождите немного. Документ загружается.
Сибирский Федеральный УниверситетСибирский Федеральный Университет
СФУСФУ
Сибирский Федеральный УниверситетСибирский Федеральный Университет
Открытие и закрытие DataSet
Чтобы открыть таблицу во время выполнения программы
необходимо вызвать метод Open класса TDataSet, например, так:
Table1.Open;
Для закрытия же таблицы программно можно написать следующую
строку:
Table1.Close;
Проверяя значение свойства Active набора данных можно узнать,
открыта ли в текущий момент таблица:
If not(Table1.Active) then Table1.Open;
Сибирский Федеральный УниверситетСибирский Федеральный Университет
СФУСФУ
Сибирский Федеральный УниверситетСибирский Федеральный Университет
Отслеживание состояния DataSet
Чтобы узнать текущее состоянии TDataSet можно использовать
DataSource, однако можно отслеживать его события через
обработчики событий TTable и TQuery:
–property OnOpen
–property OnClose
–property BeforeInsert
–property AfterInsert
–property BeforeEdit
–property AfterEdit
–property BeforePost
–property AfterPost
–property OnCancel
–property OnDelete
–property OnNewRecord
Сибирский Федеральный УниверситетСибирский Федеральный Университет
СФУСФУ
Сибирский Федеральный УниверситетСибирский Федеральный Университет
Навигация по таблице
Навигатор DBNavigator, расположенный на странице
Data Control библиотеки компонентов - компонент,
управляющий работой с таблицей
Свойство Описание
nbFirst
перемещение к первой записи
nbPrior
перемещение к предыдущей записи
nbNext
перемещение к следующей записи
nbLast
перемещение к последней записи
nbInsert
вставить новую запись перед текущей
nbDelete
удалить текущую запись
nbEdit
редактировать текущую запись
nbPost
послать отредактированную информацию в базу данных
nbCancel
отменить результаты редактирования
nbRefresh
очистить буфер, связанный с набором данных
Сибирский Федеральный УниверситетСибирский Федеральный Университет
СФУСФУ
Сибирский Федеральный УниверситетСибирский Федеральный Университет
Тема 7 Навигация по таблице баз
данных, доступ к полям
Поля отображаются объектами класса TField
и производных от него классов TStringField,
TSmallintField, TBooleanField и т.п. Эти
объекты могут создаваться тремя способами:
• Автоматически генерироваться для каждого
компонента набора данных (Table и др.);
• Создаваться в процессе проектирования с
помощью Редактора Полей;
• Создаваться программно в процессе
выполнения приложения.
Сибирский Федеральный УниверситетСибирский Федеральный Университет
СФУСФУ
Сибирский Федеральный УниверситетСибирский Федеральный Университет
Обеспечение доступа
к полям
Доступ к объектам полей возможен
тремя способами:
•По порядковому индексу объекта
•По имени поля
•По имени объекта
Сибирский Федеральный УниверситетСибирский Федеральный Университет
СФУСФУ
Сибирский Федеральный УниверситетСибирский Федеральный Университет
Вычисляемые поля
Вычисляемые поля (calculated
fields) -поля, не предусмотренные
при создании таблицы, значения
которых вычисляются на основании
значений других полей записи.
Сибирский Федеральный УниверситетСибирский Федеральный Университет
СФУСФУ
Сибирский Федеральный УниверситетСибирский Федеральный Университет
Свойства полей
Каждое поле — это объект, причем его класс зависит от типа поля:
TStringField, TSmallintField, TBooleanField и т.п. Все эти классы
являются производными от TField — базового класса полей.
Свойства TField
Название Описание
Alignment
выравнивание отображаемого текста
DisplayLabel
заголовку столбца данного поля
DisplayWidth
ширина колонки
EditMask
формат отображения данных
ReadOnly
запрет вводить в данное поле
Сибирский Федеральный УниверситетСибирский Федеральный Университет
СФУСФУ
Сибирский Федеральный УниверситетСибирский Федеральный Университет
Ограничения вводимых
значений
Несколько возможностей ограничения предоставляют
свойства полей:
• Для числовых полей имеются свойства MinValue и
Max Value, устанавливающие допустимые пределы
вводимых в поле значений;
• Свойство CustomConstraint позволяет написать
ограничение на значение поля в виде строки SQL.
Сибирский Федеральный УниверситетСибирский Федеральный Университет
СФУСФУ
Сибирский Федеральный УниверситетСибирский Федеральный Университет
Тема 8 Методы поиска
и сортировка данных
Для того, чтобы найти некоторую
величину в таблице, программист на
Delphi может использовать две
процедуры SetKey и GotoKey. Обе эти
процедуры предполагают, что поле по
которому происходит поиск
индексировано.
Сибирский Федеральный УниверситетСибирский Федеральный Университет
СФУСФУ
Сибирский Федеральный УниверситетСибирский Федеральный Университет
Поиск ближайшего
соответствия
Подобным же образом метод FindNearest или пару
методов SetKey-GotoNearest можно использовать для
поиска в таблице значения, которое наиболее близко
соответствует критерию поиска.
Пример:
with Tablel do
begin
SetKey;
Fields[O].AsInteger := 123;
GotoNearest;
end;