Article #15998: packing a dBASE table

 Technical Information Database

TI998D.txt   packing a dBASE table
Category   :Database Programming
Platform    :All
Product    :Delphi  All

Description:
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 your uses clause:

{ For Delphi 1.0: } DBITYPES, DBIPROCS and DBIERRS;
{ For Delphi 2.0: } BDE;

2) Then call the DbiPackTable BDE function as follows:

Check(DbiPackTable(Table1.DbHandle, Table1.Handle, Nil, szDBASE, TRUE));

Notes:
* The table must be opened in exclusive mode.
* Use the Check procedure when calling BDE API functions.  Check
  will raise an exception if an error occurs on the BDE call.



Reference:


7/16/98 4:33:58 PM
 

Last Modified: 01-SEP-99