[yasenkov]

точнее вот код

Код:

Table3.Active:=false;
dir:=MyDir+'\db\export.dbf';
dirk:=MyDir+'\Выгрузка\export.dbf';
CopyFile(PChar(dir),PChar(dirk), true);
Table3.Active:=true;