Èn la ayuda del BDE de Delphi busca la función DbiPackTable. Ahí muestra un ejemplo para compactar tablas de paradox, dbase o foxpro. Un ejemplo más sencillo por ser exclusivo para dbase o foxpro lo puedes encontrar en
http://prestwood.com/community/delph...sons/pack.html
// Saludos