|
Упакуй, Господи, душу его...
|
Для упаковки таблицы dBASE убедитель в том, что таблица открыта в
монопольном (exclusive) режиме и вызывайте DbiPackTable. Пример:
Table1.Close ;
Table1.Exclusive := TRUE ;
Table1.Open ;
DbiPackTable( Table1.DBHandle, Table1.Handle, nil, nil, TRUE ) ;
|
Убедитесь, что DBITYPES, DBIPROCS, DBIERRS включены в секцию USES
вашего модуля и, в случае запуска из-под IDE, в режиме
проектирования таблица не активна.
|
Пакование таблиц dBASE