资源介绍
{
例程说明:
1.使用本例程之前需要做以下工作:
1>. 建立要数据库 (别名/绝对路径)及表
2>. 建立备份库 (别名/绝对路径)
3>. 建立日志库 (别名/绝对路径)
4>. 建立镜像库 (别名/绝对路径) 本地机器 如果没有选择建立表结构,
请将1>中的表结构全部复制过来。 暂时不能自动镜像表结构。
5>. 建立镜像日志库 (别名/绝对路径) 本地机器
如果采用约略形式(例程中提供约略访问函数/方法)请分别建立如下的数据库(2>-5>):
Alias:2>.BackUp
3>.Log
4>.Mirror
5>.MirrorLog
2. 需要使用该例程时,将MirrorDBbase.pas复制到当前目录并且
在uses语句中加入:MirrorDBase。
3。定义了一个记录类型:
TCurRecInfo=Record
CurrentRec:integer; //当前的记录号
TotalRec:integer; //表的总记录数
end;
4。1>。IsTableExists 判断表是否存在 存在-True 不存在-False;
2>。GetCurrentRecordOldInfo 获取当前记录的记录值及记录总数
3>. GetCurretnRecordFieldOldValue 获取当前记录修改前的值
4>. CreateLogTable 建立整个库的日志表(概况)
5>. CreateDetailChangedTable 建立相应表的详细日志表
6>. CreateBackupTable 建立相应表的详细备份表
7>. CreateMirrorTable 建立相应表的镜像表
8>. CreateMirrorLogTable 建立相应表的镜像日志表
9>. BackInfo 备份表数据
10>.LogInfo 记录修改信息和数据
11>.MirrorInfo 镜像修改信息和数据
12>.VertifyData 校验修改后和修改前的表
13>.GetFieldValue GetCurretnRecordFieldOldValue的简洁形式
14>.CreateSomeTable 上述4-8的功能的集成及简约书写
15>.BackTable 9的简约书写 另添加备份可选功能。
16>.LogTable 10的简约书写
17>.MirrorTable 11的简约书写
}
- 上一篇: 现代天线设计(英文版)
- 下一篇: *山水城市理念与建设 (2010年)