ITableChecks.Remove

Синтаксис

Remove(Check: Integer): Boolean;

Параметры

Check — номер ограничения.

Описание

Метод Remove осуществляет удаление ограничения таблицы. Номер ограничения передается посредством параметра Check.

Пример

Sub Main;

Var

MB: IMetabase;

Object: IMetabaseObject;

Table: ITable;

Checks: ITableChecks;

s: String;

Begin

MB:=MetabaseClass.Active;

Object:=MB.ItemById("TABLE_1").Edit;

Table:=Object As ITable;

Checks:=Table.Checks;

If Checks.Remove(0) Then

s:="Removed";

Else

s:="Don't Removed";

End If;

Object.Save;

End Sub Main;

После выполнения примера в переменной «s» будет содержаться «Removed» если удаление первого ограничения таблицы прошло удачно. Идентификатор таблицы - «Table_1».

См.также:

ITableChecks