问:delphi中一般的数据备份和数据恢复怎么处理? ( 积分: 11 )

  • 主题发起人 主题发起人 ruoxi_shuai
  • 开始时间 开始时间
R

ruoxi_shuai

Unregistered / Unconfirmed
GUEST, unregistred user!
问:delphi中一般的数据备份和数据恢复怎么处理?
不需要太复杂,问怎么处理比较简单?
最好能提供部分参考代码
 
以前有人答过了阿
最简单是否就是备份文件,然后再恢复文件。都是以拷贝方式。
procedure TFrmTotal.Button3Click(Sender: TObject);
begin
if MessageBox(GetActiveWindow(), '是否从备份目录中恢复数据?', '提示', mb_IconQuestion + mb_YesNo) = Id_yes then
begin
CopyFile('c:/WSoftDataBak.dat', 'c:/PHG.da', False);
ShowMessage('数据已成功恢复');
end;
end;
procedure TFrmTotal.BackupDataButClick(Sender: TObject);
begin
CopyFile('c:/PHG.da', 'c:/WSoftDataBak.dat', False);
Application.MessageBox('数据文件已备份成功', '系统提示', 1);
end;
 
不知道你是备份数据库还是备份文件
如果是sql数据库直接写sql语句备份就行
如果是文件按楼上的方法 或者在加个压缩算法
 
同意上面的,主要看你要備份的文件是文件還是數據庫,然後採取相應的行動
 
后退
顶部