Ограничения на значения полей
Набор данных имеет свойство 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-сервера или словаря данных.