Delphi 3 и создание приложений баз данных

Ограничения на значения полей


Набор данных имеет свойство property Constraints: TCheckConstraints; которое представляет собой коллекцию компонентов TCheckConstraints. Каждый такой компонент определяет ограничение, накладываемое на значение одного или более полей. Число ограничений, созданных для НД, определяется свойством коллекции Constraints property Count: Integer; Доступ к отдельному ограничению с индексом Index осуществляется при помощи свойства property Items|Index: Integer): TCheckConstraint;

При этом значение Index должно находиться в диапазоне 0..Count - 1. На рис. 7.40 показан список ограничений, определенных для НД, как он выглядит при обращении к свойству Constraints набора данных в инспекторе объектов.

Каждое ограничение имеет тип TCheckConstraint. Рассмотрим свойства этого компонента.

property CustomConstraint: string;

Содержит текст ограничения на значение поля (полей) в SQL-подобном синтаксисе, например:

Table1.Constraints. .Items[i].CustomConstraint := 'Razrjad > 7 and Razr]ad < 15';

property ErrorMessage string;

Содержит текст сообщения об ошибке. Это сообщение выводится, если пользователь предпримет попытку запомнить запись, поля которой не удовлетворяют данному ограничению (рис. 7.41).

property FromDictionary: Boolean;

Указывает источник формирования ограничения - словарь данных (значение True) или непосредственно приложение (False).

property ImportedConstraint string;

Используется для запоминания SQL-текста ограничения, импортированного из SQL-сервера или словаря данных.

Содержание раздела