Db > Db Assembly Interfaces > ITableFields > ITableFields.Clear

ITableFields.Clear

Syntax

Clear;

Description

The Clear method clears the fields list of the table.

Example

Sub UserProc;
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    Table: ITable;
    Fields: ITableFields;
    Field: ITableField;
Begin
    MB := MetabaseClass.Active;
    MObj := MB.ItemById("Table_1").Edit;
    Table := MObj As ITable;
    Fields := Table.Fields;
    Fields.Clear;
    Field := Fields.Add;
    Field.Id := "NEWFIELD";
    Field.Name := "New field";
    Field.DataType := DbDataType.Integer;
    MObj.Save;
End Sub UserProc;

After executing the example, all fields of the table with the Table_1 identifier are removed. One new integer field NEWFIELD is created instead of them.