How to compact MS. Access Database Files in Delphi

Anyone knows how to Compact the Database File by using Delphi?

Thanks.

Regards,
Recur.