Text: String;
The Text property determines the text of table constraint.
Sub Main;
Var
MB: IMetabase;
Table: ITable;
Checks: ITableChecks;
Check: ITableCheck;
s: String;
Begin
MB:=MetabaseClass.Active;
Table:=MB.ItemById("TABLE_1").Bind As ITable;
Checks:=Table.Checks;
Check:=Checks.Item(0);
s:=Check.Text;
End Sub Main;
After executing the example, the "s" variable contains text of the expression of the first table constraint. The table identifier is Table_1.
See also: