packing a dBASE table

Q:  How do I pack a dBASE table?

A:  To pack a dBASE table that has been opened with a TTable use the BDE function DBIPackTable.  There are two basic steps to do this:

1. Add the following units to our uses clause: DBITYPES, DBIPROCS and DBIERRS.

2) Then call the BDE function as follows:

DBIPackTable(Table1.DbHandle, Table1.Handle, 'TABLENAME.DBF', szDBASE, TRUE);

Note: The table must be opened in exclusive mode.