说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

利用Tbatch组件完成数据批处理-Delphi资料

HTML文档下载 WORD文档下载 PDF文档下载
利用Tbatch组件完成数据批处理-Delphi资料

在 数 据 库 应 用 系 统 中, 常 常 要 对 数 据 进 行 成 批 的 如 追 加、 删 除、 更 改 等操 作, 这 种 批 量 操 作 在 专 门 的 数 据 库 开 发 工 具 如VFP 中 用APPEND 、COPY 命 令带 上 相 应 的 命 令 子 句 就 能 轻 易 完 成。 但 在 其 它 开 发 工 具 中 并 没 有 类 似 的命 令, 而 是 提 供 能 完 成 类 似 功 能 的 控 件 或 对 象, 如 在PowerBuilder 中 就 是 利 用

Pipe Line( 数 据 管 道) 来 完 成 两 个 或 同 构 或 不 同 构 的 表 之 间 的 数 据 批 处 理。

本 文 要 介 绍 的 是Delphi 中 用 来 完 成 数 据 批 处 理 任 务 的 组 件TBatchMove。TBatchMove 组件 能 够:

将 一 个 数 据 集 中 的 数 据 追 加 到 一 个 表 中。

从 一 个 表 中 删 除 满 足 条 件 的 记 录。

按 旧 表 结 构 生 成 一 个 新 表, 若 欲 生 成 的 新 表 已 存 在, 则 覆 盖。

具 体 的 操 作 要 通 过 设 置TBatchMove 的Mode 属 性 后 再 调 用Execute 方 法 来 完 成。 为 举 例 说 明 问 题, 我 们 在 别 名 数 据 库DBDEMOS 中 先 创 建 两 个dBase 格 式 的 表Test1.dbf 和 Test2.dbf。 二 者 的 结 构 如 下 表:

Test1.dbf Test2.dbf

Name C 10 Name C 10

Code C 3 Code C 3

其 中 表Test2.dbf 在 字 段code 上 建 立 有 唯 一 索 引。 同 时 假 设 表 单 中 已 有 两 个TABLE 控 件Tsource 和Tdest 和 一 个TbatchMove 组 件batchmove1。Tsource 和Tdest 的DatabaseName 属 性 均设 DBDEMOS。batchmove1 的source 属 性 设 为Tsource,destination 属 性 设 为Tdest。

在 使 用TbatchMove 组 件 时, 必 须 牢 记: 所 有 的 操 作 都 是 以 源 表 为 标 准 针 对 目 的 表 进 行 的, 下 面 就 分 别 举 例 说 明TbatchMove 的 各 种 操 作 模 式:

batAppend 追 加 模 式 将 源 表 中 的 数 据 追 加 到 目 的 表 中, 目 的 表 必 须 事 先 存

在。 这 是 缺 省 模 式。

batchmove1.source=Tsource;

batchmove1.destination=Tdest2 ;

batchmove1.Mode:=batCopy;

batchmove1.Execute;

batUpdate 更 新 模 式 用 源 表 中 匹 配 目 的 表 的 记 录 替 换 目 的 表 中 的 相 应 记 录。 目 的 表 必 须 事 先 存 在 且 有 一 已 定 义 的 索 引 用 来 匹 配 源 表 中 的 记 录。

Tdest.IndexFieldNames:='code';

batchmove1.source=Tsource;

batchmove1.destination=Tdest ;

batchmove1.Mode:=batUpdate;

batchmove1.Execute;

batAppendUpdate 追 加 更 新 模 式 如 果 源 表 中 有 与 目 的 表 匹 配 的 记 录, 则 替 换 目 的 表 记 录, 否 则, 直 接 追 加 到 目 的 表 中。 目 的 表 必 须 事 先 存 在 且 有 一 已 定 义 的 索 引 用 来 匹 配 源 表 中 的 记 录。

Tdest.IndexFieldNames:='code';

batchmove1.source=Tsource;

batchmove1.destination=Tdest ;

batchmove1.Mode:=batAppendUpdate;

batchmove1.Execute;

batCopy 拷 贝 模 式 按 源 表 结 构 生 成 新 表, 源 表 中 的 数 据 同 时 拷 贝 到 目 的 新 表 中。 如 果 要 生 成 的 新 表 已 存 在, 则 覆 盖。

// 按Test1.dbf 生 成 新 表xxx.dbf

// 如 果 不 指 定 扩 展 名dbf, 生 成 的 新 表 将 是Paradox 格 式 的xxx.db。

Tdest.TableName:='xxx.dbf';

batchmove1.source=Tsource;

batchmove1.destination=Tdest ;

batchmove1.Mode:=batCopy;

batchmove1.Execute;

batDelete 删 除 模 式 删 除 目 的 表 中 与 源 表 匹 配 的 记 录。 目 的 表 必 须 事 先 存 在 且 有 一 已 定 义 的 索 引 用 来 匹 配 源 表 中 的 记 录。

Tdest.IndexFieldNames:='code';

batchmove1.source=Tsource;

batchmove1.destination=Tdest ;

batchmove1.Mode:=batDelete;

batchmove1.Execute;

TBatchMove 还 有 一 个 重 要 属 性ChangedTableName, 在 实 际 运 用 中, 通 过 指 定 ChangedTableName 属 性 可 以 创 建 一 个Paradox 表, 该 表 用 来 保 存 目 的 表 中 被 更 改 数 据 的 原 始 备 份, 有 了 这 个 备 份 表 就 可 以 确 保 恢 复 目 的 表 中 的 数 据。

顺 便 提 一 句, 如 果 要 删 除 某 一 个 表 中 的 全 部 记 录, 可 以 采 用Table 组 件 的 EmptyTable 方 法, 例 如Tdest.EmptyTable 将 清 空Tdest 所 指 定 的 表test2.dbf。

本 文 中 是 以 同 构 的dbf 表 进 行 的 示 例, 在 实 际 运 用 中, 源 表 和 目 的 表 可 能 同 购, 也 可 能 异 构, 异 构 时,Delphi 的BDE 会 自 动 进 行 类 型 和 长 度 上 的 转 换, 具 体 类 型 间 的 关 系 可 以 有 关BDE 的 帮 助。 本 文 中 各 种 操 作 模 式 的 实 际 结 果 均 可 以 从Delphi 的Database Desktop 中 查 看 到。

Command & Conquer 文件格式-VB资料 CrystaIReports for VB5报表编程经验 DirectX揭密-VB资料 HOOKS 说明书-VB资料 kb_event函数的使用 -VB资料 MaskEdit 中 9 的问题 -VB资料 MDB文件的导出(使用DAO)-VB资料 PaintPicture的和法 -VB资料 Shell & Wait 的程序怎么写? -VB资料 SHELL语句用法心得-VB资料 VarPtr、StrPtr和ObjPtr函数的用法-VB资料 VB 在ACADWIN中的使用 VB5.0应用程序的启动与退出设计 VB5如何取得CDROM的盘符? VB5三十六计 VB5中确定CPU类型 Vb6.0编程技巧四则 VB6二进制双通道技术实战经典 VB6内置的内码转换功能 VB编程步步高-代码效率篇(一) VB编程步步高-杂类篇(二) VB编程步步高-杂类篇(一) VB编程的必备技巧 VB编程的一些心得 VB编程技巧几例 VB编程经验点滴 VB编程俱乐部问答 VB编程如何控制I/O口 VB编程问与答 VB编程之提速攻略(二) VB编程之提速攻略(三) 这种交叉表怎么实现?有点难度!! 请问如何将Canvas对象里的绘制的东西保存为.jpg文件格式? 急救:谁能给我一个文本框中只能输入数字的判断函数啊? VS.NET七张安装盘中哪一张里有Visual SourceSafe? 来看看 实现MediaPlayer的Display大小随着FORM的大小变化而变化。。??(初学者) 数据库中字段的主健是什么意思,有什么用啊!! QQ 被盗怎么才能解决呢。 想问一下如何再windows应用程序和web Server中间传送XML ATL & STL 的问题 about string 疑问 IE环境总是出现cannot open file "Debug/xx.exe,在线等候? 一个简单的问题:) com中用ado连接数据库 简单问题,小弟不会,怎样把picture对象的内容保存成文件?《真的给分》 谁有 Style Report EE 的非试用版序列号? 几个使用linux的很菜的问题 怎么把linux下的图形转移到window 2000下(请大家帮忙!急用!!谢谢!!!) 树?? 请问哪儿有acrobat下载?不是acrobat reader. 一个窗口,可以改变大小,但宽度高度只能在一个范围内,比如宽的范围是u-v,高的范围是x-y,超过范围就不能再改变,怎么做? 小问题,如何解决?谢谢各位大虾!!谢谢,我在线等 要上次网络程序员的试题。 sanfen 为什么我的字总是看着上下都缺一点? 死阿猫,老博亦,跑那去了,赶快看看我的问题~~~~~ 错在哪里?提示“标准表达式数据类型不匹配” 记得原来WIN95下有个快速查看的软件,2000下找不到了,请大家指点指点 快救我一下 急1! 怎么在DBGRID中实现下拉框??在线等待高手!!! 请问一个在安装WIN2000时的问题 delphi 编程时,如何把memo中字符的“回车”去掉! 如何在串口通讯中读写中文? 有没有誰知道哪个网站现场直播世界杯的. Query的查询 有关DDX的问题,高手请帮忙 用过NUCLEUS GRAFIXWT 和GRAFIXGS的朋友请进 about windows media player? 请问哪里有outlook express60的安装程序下载? socket通讯的问题! winxp的桌面图表问题 软件工程预算,急急急!!!!! 程序员教材的错误。 ADO简单问题求教,解决问题立即送分,绝不食言! 对于您来说可能很简单的日期问题,对于我很重要! 哈哈,阿猫现在不在,有想骂他的赶紧进了啊,我先来一句:死阿猫。。。。。 请大家说说这个小偷是不是很有义气呀! 猪猪要退出水园了,强烈挽留猪猪继续当我们的版主!支持的进来签名 着急!! 我是菜鸟 为什么我们要保持蚯蚓体表湿润?蚯蚓能不能生活在干燥的环境中,为什么? 污水废气的污泥怎么测它的含水率及计算方法污泥要烘多长时间 关于蜡烛的燃烧的化学实验报告单怎么写啊? 什么颜色最吸热是黑色还是黄色?是不是跟波长有关系? 果糖和葡萄糖的反应的结构式 蜡烛燃烧的因素将两根高低不同的蜡烛点燃,罩在烧杯下面,记录熄灭的时间,并说明原因 有关颜色吸热与哪些关系有关1.颜色的吸热能力是否与它的颜色深浅度有关?2.颜色的吸热能力是否与它的表面积大小有关?3.颜色的吸热能力是否与它的表面粗糙程度有关? 果糖美拉德反应强于葡萄糖?如题 原因为何(如它们结构上的差异) 好的话多给分 化学实验-——蜡烛燃烧一支燃烧中的蜡烛,用坩埚钳夹一根短导管插入烛芯,在导管口处有什么冒出,在导管口放一根燃着的火柴,可观察到什么现象. 同一种物质,表面颜色较深比表面颜色较浅的吸热(),散热(). 采石矿山,购买黑火药,被抓到3公斤.是用做炸石头的.会怎么判. 人能听到20赫兹到20000赫兹吗 葡萄糖能否与钠反应,如果能反应的化学方程式是什么 五年级下册第七单元作文 200字 想象望洞庭这首诗所描述的景色,先说一说,在写下来 刚买的不锈钢的蒸锅应该怎么处理才可放心的用 在线LOWE玻璃与离线LOWE的玻璃哪个贵? 想象望洞庭描绘的景色 新买蒸锅怎么处理 lowe玻璃是什么玻璃 想象望洞庭描写的景色 青藏高原的平均海拔是多少(请注明哪个文献说的)青藏高原的平均海拔是多少?请注明是哪个文献(发表年代,作者,杂志名),具体的报道过这个事情.新闻,听说的,都不算. "枪手"电蚊香是杀死蚊子还是熏跑蚊子 做中空时lowe玻璃如何去周边膜层 青藏高原平均海拔在4()以上 我觉得我现在用的电蚊香液不仅熏蚊子还熏人怎么办? 水滴轮只能按下离合开关才能泻力放线吗 在一定体积的浓硫酸中加入过量的铜片,加热使之反应,若使剩余的铜片继续溶解,可以向其中加入硝酸盐.求解为什么可以? 语文四年级下册大本第五单元的作文 几十万赫兹的超声波波对人体有害吗另外高频音对人体有害么 浓硫酸与铜片加热后反应50ml浓硫酸和铜片加热后反应,铜片完全溶解后,产生2.24L(S.T.P)气体,把反应后的溶液稀释至1L,取20ml,加入足量的BaCl2,产生3.728g沉淀.求原硫酸溶液的物质的量的浓度.答案 四年级下册语文大本温故知新(一)作文 1000赫兹的次声波对人体有害吗是不是在0.01~20赫兹以外都对人体无害啊 滤波电容是利用电容的充放电特性,那耦合电容是利用电容的什么特性.电容在电路起耦合作用时电容两端的电压没有变化,电容正极的电压升高多少,负极的电压也相应升高多少.好像没有对电 葡萄糖溶液为什么可以和钠反应放出氢气速求那醛基可以和钠反应吗? 正常自来水水压是多少 关于电容耦合的工作原理我也明白电容是阻直通交,我就是不明白那些信号要是按电容充放电特性怎么过的去呀.你的意思是说交流可以从电容的2极间的绝缘介质中流过,是这样吗,我以为通交 在黑火药制备中,硝酸钾的制备工艺是什么样的? 自来水的水压不稳定,流量控制阀可不可以控制出水流量吗? 不锈钢饭盒能放在蒸锅里蒸吗? 怎样使用铜丝发热引燃黑火药?黑火药燃烧至少需要多少热量?5米左右长的一般铜丝电阻是多少?如果要用五米长的铜丝发热引燃黑火药需要加压多大?用干电池能否实现? 黑火药为什么爆炸 用蒸锅蒸饺子,怎样可以使饺子不粘不锈钢蒸板? 青藏高原的平均海拔 海豚和蝙蝠能听到多少赫兹的声音好的追加分,不好的不选! 浅色衣服比深色衣服的吸热能力弱对还是错 下列条件下铁钉最容易生锈的是A.浸泡在海水中 B.浸泡在植物油中 C.置于干燥的空气中 D.浸泡在蒸馏水中 请问一下黑火药吸入肚子里面会怎么样,黑火药有毒吗? 苏泊尔不锈钢蒸锅 质量如何?【苏泊尔不锈钢蒸锅】{电蒸锅品 牌 热 销} 我国青藏高原的平均海拔是A.4500 B.3000.C.6000 D.5500 属于氧化反应吗 黑火药爆炸 夏天人们穿着不同颜色的衣服,吸热本领() 把一个铁钉放在哪个地方易生锈(选择题)把一个铁钉放在哪个地方易生锈:A.有氧气,二氧化碳和盐的水中B.蒸馏水C.完全无氧的环境中D.(忘了) 不锈钢蒸锅,不锈钢提锅的用英语怎么写啊?比如,联通牌提锅怎么说? 铁钉在什么环境下容易生锈 一扇lowe玻璃断桥铝合金推拉门的价格是多少. 青藏高原因为高海拔所产生的现象与特点青藏高原因为高海拔产生了什么现象与特点?(比如说气候、饮食、环境、文化……)请尽量多的列举出来,并说明理由,越多越好. 做悬浮物和污泥含水率要放入105度烘箱内烘2个小时,请问能烘2小时以上...做悬浮物和污泥含水率要放入105度烘箱内烘2个小时,请问能烘2小时以上吗,有限制多少时间范围吗 lowe玻璃中文字是什么
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘