delphi的paradox数据库在程序中如何制作数据库的备份和还原这一项呢？

Question

具体的备份和还原的函数用那个呢？

Answer 1

begin
if copyfile('D:\test\db\txgz\gzsjk.dbf','D:\test\db_bak\txgz\gzsjk_bak.dbf',false)
and  copyfile('D:\test\db\zggz\gzjsk.dbf','D:\test\db_bak\zggz\gzjsk_bak.dbf',false)
 then
 application.MessageBox('数据备份成功','备份数据',mb_ok)
 else
  application.MessageBox('数据备份失败','备份数据',mb_ok);
end;
希望帮上你，恢复时COPY回来就行了，但是记得把TABLE.CLOSE 否则报错！！

Answer 2

用COPYIFLE（‘C：\123。DB’，‘C：\456。DB’，TRUE）

Answer 3

参数设置为true，表示如果目标文件存在，则不覆盖提示错误。
参数为false,如果目标存在则覆盖，成功。

Answer 4

直接拷贝即可，但是要将所有同名文件都拷贝。比如db文件是a.db,则要拷贝a.*到备份目录

Answer 5

如何复制某一文件夹内所有的word文档到另一目录中？

Answer 6

begin
if copyfile('D:\test\db\txgz\gzsjk.dbf','D:\test\db_bak\txgz\gzsjk_bak.dbf',false)
and  copyfile('D:\test\db\zggz\gzjsk.dbf','D:\test\db_bak\zggz\gzjsk_bak.dbf',false)
 then
 application.MessageBox('数据备份成功','备份数据',mb_ok)
 else
  application.MessageBox('数据备份失败','备份数据',mb_ok);
end;
正确啊