TTable, DBF i kasowanie rekordow

Jak wyczyscic cala tabele DBF'a,
tak aby byla rzeczywiscie pusta.
Jesli robie to n-razy ploceniem table1.delete;
Rekordy wcale nie sa usuwane, tylko zaznaczone jako niewidoczne.
Kolejne rekordy wiec dopisywane sa na koncu pliku dbf.
Powoduje to ze po kilkukrotnym czyszczeniu pliku dbf, i wpisywaniu rekordow na nowo, plik dbf, zwieksza kilkukrotnie swoje rozmiary.

Jak Temu zapobiec?
Dzieks...

Spróbuj TTable.EmptyTable i/lub http://4programmers.net/Forum/viewtopic.php?id=40674

Jesli daje table1.emptytable;
to wyswietla mi blad table cannot be opened for exclusive mode....

Niestety to nie pomaga

Table1.Close;
Table1.Exclusive := True;
Table1.EmptyTable;
// zaglądaj czasami do helpa