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

利用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 中 查 看 到。

用VB6.0中文版进行DHTML程序开发 用VB编写标准CGI程序 用VB编写留言板 用VB播放FLASH动画 用VB开发进程管理软件 VB用WinSock设计Chat程序 运用MSChart,生成统计图形-VB资料 向文本框等等控件的系统右键菜单里追加自己定义的菜单-VB资料 在VB中用定时控件实现长定时操作 在Visual Basic中,在GotFocus事件中快速选定文本 在程序中注册和注销 OCX 控件 -VB资料 在运行时维护DBGRID的栏位宽度-VB资料 VB怎样使用VB开发基于Sybase的C/S软件 VB怎样在运行时动态生成多个相同的控件 直接编辑VB中网格控制项的两种方法 自制控件方面的有关知识-VB资料 Unicode vs Ansi -VB资料 VB 中调用 Word 拼写检查 VB4.0安装程序的汉化 VB中对字符串的处理及其扩展 把符串中的一子串替换为另一子串 -VB资料 把数字转成英文字-VB资料 翻转一个字符串-VB资料 混合字符串的长度 -VB资料 将阿拉伯数字转成中文字的程式 -VB资料 将包含有Null结尾的字符串转换为VB字符串 切分字符串-VB资料 清除字符串中指定的字符 -VB资料 VB如何取得计算机的所有字型? VB如何取得中英混合字符串的长度? 使VB的网格控件具有输入功能 在程序中用函数设置session的时效、存放路径 如何在ms-dos下降低cpu的运行速度?(汇编,C高手请进) 求解决链表问题 请教:如何在linux嵌入系统中编写外设驱动程序.谢谢 Micrsoft JDK nmake生成的EXE文件反编译问题!!! 多态问题 专业调查:军训练什么,学到什么!!????? 使用IS for Delphi 4制作安装盘.安装时时出现401号错误(字符串变量不够长) 介绍几本VC入门的好书 大家谈谈,数据库应用程序如何设计及使用类! Oracle的登录问题! 请问如何在VC中取得传入的参数? 现在的浏览器还支持不支持applet啊?高手救我!--------怎么写一个applet兼容更多的浏览器? 请问那里有这种工具??近来看看!! 请capboy等写过filter的各位前辈指点 利用DW制作一张确定最佳分辨率为800*600或者1024*768的页面, 急 求助: 怎样获得系统当前可用的字体? 如何打印FormView? 如果你是VC高手,对COM有深入了解,欢迎! 我今天看了我英语过级的公布成绩,我得了一个天险数字60。5分,请问。。。。。? 谁有linux下的mod_webapp.so DW UltraDev里rs.source="select * from stu where banci=request.QueryString("banci")这样是不是不行? Microsoft JDK nmake生成的EXE文件反编译问题!!! 各位大虾:请问谁能告诉我哪里能找到win xp home edition plus???如果能让我找到,送1000分 请问如何将PaintBox.Canvas的当前内容保存至内存, Linux下c语言程序该怎样运行? 请问:vb.net中oracle数据库能否支持blob格式? .ceb文件如何打开? 什么地方能够找到《Exploring Requiremengs:Quality Before Design》这本书? 关于制作一个classwizard的设计思路,欢迎大家讨论 weblogic server console: java.lang.NullpointerException 如何得到本局域网上所有主机的ip? 请问: 如果在网上可以通过网页上传某些文件到服务器空间上,并显示一些关于上传文件的信息~ 一段检测光软驱的程序,大家帮忙除Bug! 为何会死机? 高分放送,木马病毒求救! tomcat下的分布怎么做? 各位使用手机的老鸟,2000左右的手机什么牌子的好 喜欢硬件朋友请进来看看。 如何复原被Linux改写的引导扇区呢 请问各位大虾,怎样将c++同数据库结合起来 大哥......你继续看!!!??? 喜欢硬件朋友请进来看看。 在哪里调用方法?是在cpp文件还是在.h文件里? 初学者关于显示的问题? depunf朋友,您好,stringgrid那里有delete啊?敬请赐教! formula one报表打印问题 d3d头文件的错误? 执行了insert语句之后我怎么得到刚刚插入的id值啊?快快,在线等待 为什么找不到服务器? 如何禁止用户调整窗体大小?但最大化、最小化和关闭按钮仍在。 冷却塔蒸发损失计算中冷却介质的温度较高或较低是怎么界定的.急, 鸽子要怎么家飞 假定五对等位基因自由组合.杂交组合AaBBCcDDEe*AaBbCCddEe产生的子代中,有一对等位基因杂合丶四对等位基因纯合的个体所占的比率是A 1/32 B 1/16 C 1/8 D 1/4 代表死亡的树是什么树 中和的概念对于强酸与弱碱或强碱与弱酸是以ph达到7为标准吗? 等位基因只有一对然而相对形状可以有很多种?人的等位基因在同源染色体上面,等位基因只有一对,为什么有的相对性状可以有很多对?比如人的皮肤有黄的,黑的,白的,棕色的,等等,多对不同形 1小时蒸发500L,一般需要多大的冷却塔 电中和与电中性是不是同一概念? 运送一批蔬菜,小货车运送的这批蔬菜的五分之二,大货车比小货车多运送了这批蔬菜的十分之一,大小货车一共运送了这批蔬菜的几分之几. 春天里最适合种什么树 关于滴定中和实验指示剂的原理当PH到7的时候会突变,这是为什么呢,虽然每个指示剂都有酸碱的范围及颜色,但为什么一到7就突变呢,书上说的变色范围没特别指出7的时候怎么变啊? 草履虫通过什么吸收外界环境中的氧和排出二氧化碳 已知Mg(s)+1/2O2(g)=MgO(s) △H=Q1,2Hg(s)+O2(g)=2HgO(s) △H=Q2,现有反应Mg(s)+HgO(s)=Hg+MgO △H=Q3,则Q3应为正确答案是Q1-1/2Q2,我想问为什么不是1/2Q2-Q1呢 甲骨文在我国文字发展史上具有怎样的地急! 梅花代表什么意思 请告知甲醇的原电池反应怎么写,要求写出正极和负极的反应 甲骨文在我国文字发展史上具有怎样的地位 梅花象征的意思 生长在南方的树有什么什么地方都有的也好 中李斯具有怎样的性格特点? 酶在生物体内有调节新陈代谢和生长发育的作用吗 求关于诚信的文章(1200字左右) 《史记 李斯列传》说明了什么道理 新陈代谢过程包括生物体内全部的____反应. 14学会合作所举的两个事例是什么 急求《史记 越王勾践世家》中一段的古代汉语句法结构分析其后四年,越复伐吴.吴士民罢弊,轻锐尽死于齐、晋.而越大破吴,因而留围之三年,吴师败,越遂复栖吴王于姑苏之山.吴王使公孙雄肉 古汉语的两个问题请问庄子《运斤成风》中“吾无以为之质矣”和《庄子钓于濮水》中“宁其死为留骨而贵乎”两句的句式分析? 乙醇怎么到乙炔 英语翻译这几段的翻译或注解:1.赵高案指李斯,李斯拘执.鹿游于朝也.”2.于是二世乃使高案丞相狱,.囚安得上书!”3.赵高使其客十余.为丞相所卖.”4.二世二年七月.夷三族.有注解最佳 求几道古汉语题1.“究天人之际,通古今之变,成一家之言.”出自?A.《史记》B.《报任安书》C.《陈情表》D.《上书谏吴王》满分:5 分2.《淮阴侯列传》的淮阴侯是指?A.韩信B.霍光C.田蚡D.窦婴满 怎么用乙醇制乙炔乙醇能不能才浓硫酸的催化下从乙烯进一步变乙炔,温度是多少 英语翻译于是………………上郡使者至………………系于阳周 酶只能在生物体内发生作用吗? 关于醇类燃料原电池反应对于一些醇类燃料原电池的反应原理,我不太清楚 .在写其正、负极反应是有什么技巧? 有些循环水冷却塔中为什么需要两级,中间加缓冲罐,这样做的目的? 生长激素分泌过多 中国汉字发展史要有字的演变,比如哪一个汉字从象形文字演化到今天的文字的过程 循环水开式冷却塔结冰什么原因及解决方法 等位基因A和a的最本质区别是什么? 人体内的生长激素是由哪里分泌的? 各种花朵的含义及象征 等位基因:位于-对-的-上,控制着-的基因.等位基因的本质区别是基因的-不同,-产生等位基因“-”为空格处 鸽子一定会飞吗 已分化的动物体细胞的细胞核为什么具有全能性? 显性基因与隐性基因在结构上的本质区别 鸽子多大会飞40天会飞吗 如何使已分化的动物细胞的细胞核表现出全能性? 等位基因A和a的最本质区别是?A 基因A,a依次控制显隐性状 B A对a起显性作用C 两者的碱基序列不同 D 在减数分裂时基因A与a分离为什么选择C?解释~ 鸽子会不会飞回来 C4H10 一氯代物的结构简式 老鸽子养多久可以家飞拜托了各位 为什么鸽子晚上不会飞 如何让鸽子认家想养一些鸽子玩玩 没什么太高要求 只想看鸽子在家附近飞 养多少合适 公母比例多少 邻居也不让养太多离我几公里处有一处养鸽子的(买鸽处)目测至少50来只会飞走吗? 草履虫的表膜不具有下列哪一项功能( 树最适合用来表示() A有序数据元素 B 无需数据元素 C 元素之间具有分支层次关系的数据 D 元素之间 联系的 请问丁烷是不是也有三种二溴代物,可不可以写出它们的结构简式, 鸽子要几个月才能像大鸽子一样飞我养了几只鸽子快两个月了还总是在房子上站着,不到天上飞!我想知道鸽子几个月可以飞出家里很远啊! 什么树可以代表学校 鸽子多久认家,我的鸽子还能回来吗?搬家以后怕鸽子跑了(原来两只,现在仅一只),就一直养在阳台的笼子里,春夏秋季在室外养,冬季在室内养,大约3、4年了.今年刚把它放在阳台上约两个月, 假定5对等位基因自由组合,则杂交组合AaBBCcDDEe×AaBbCCddEe 产生的子代中,有一对等位基因杂合,四对等位基因纯合的个体所占的比率是:A1/32 B 1/16 C 1/8 D 1/4
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘