Sources
Delphi Russian Knowledge Base
DRKB - это самая большая и удобная в использовании база знаний по Дельфи в рунете, составленная Виталием Невзоровым

Функция для быстрого копирования таблиц вместе со всеми дополнительными файлами

01.01.2007
// Только для не SQL-ых, т.е не промышленных БД (dBase, Paradox ..)
// Путь нужно задавать только АНГЛИЙСКИМИ буквами
procedure
QuickCopyTable(T: TTable; DestTblName: string; Overwrite: boolean);
var
 
DBType: DBIName;
 
WasOpen: boolean;
 
NumCopied: word;
begin
 
WasOpen := T.Active;
 
if not WasOpen then
    T
.Open;
 
Check(DbiGetProp(hDBIObj(T.Handle),drvDRIVERTYPE, @DBType,SizeOf(DBINAME), NumCopied));
 
Check(DbiCopyTable(T.DBHandle, Overwrite, PChar(T.TableName),DBType, PChar(DestTblName)));
  T
.Active := WasOpen;
end;

Взято с https://delphiworld.narod.ru