Advantage TDataSet Descendant
Removes all records from the table and rebuilds indexes associated with the table.
procedure AdsZapTable;
AdsZapTable will remove all records from the table; then the Advantage Client Engine will reindex the table. The indexes must be opened during the empty or they will become invalid. This operation requires exclusive access to the table, which is specified during the open.
AdsTable1.Exclusive := TRUE;
AdsTable1.Active := TRUE;
AdsTable1.AdsZapTable;