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

在DBGRID中实现COPY、PASTE功能-Delphi资料

HTML文档下载 WORD文档下载 PDF文档下载
在DBGRID中实现COPY、PASTE功能-Delphi资料

工具条上的Cut、Copy和Paste加速按钮,对于使用Windows下编辑器的人来说,恐怕都是非常熟悉而且不可缺少的。Delphi(1.0和2.0版)中的有些控件,如:TDBEdit、TDBImage、TDBMemo、TEdit等,具有CutToClipboard、CopyToClipboard和PasteFromClipboard方法,在这些控件上,利用这几个方法,只要通过简单的编程,就可以实现上述加速按钮。但TDB Grid控件却不提供上述方法,无法直接实现这几种功能。而在单机的数据库应用程序中,TDBGrid却经常被用来进行数据(包括数字和文字)的输入,没有Copy和Paste功能,使用起来深感不便。笔者在编程过程中,利用中间控件进行“过渡”,间接地实现了这几种功能。

主要思路:既然TDBGrid控件无法直接实现Copy和Paste编辑功能,则可以将TDBGrid控件中需要进行这几种编辑的字段(Field)的内容,转移到具备这几种功能的控件(以TDBEdit为例)中去,编辑完毕后,再传回到TDBGrid中。

具体方法:在已设计好的包含有TDBGrid控件(设名为DBGrid1)的窗体中,增加一个TDBEdit(设名为DBEdit1)控件,其DataSources属性设为与DBGrid1的DataSources属性相同,对DBGrid1控件的OnColEnter事件编程,使DBEdit1的DataField属性值等于DBGrid1控件的被选择字段的字段名。再在窗体中增加两个快速按钮:Copy和Paste,图形可选Delphi子目录下ImagesιButtons子目录里的Copy.bmp和Paste.bmp。对Copy快速按钮的OnClick事件编程:

DBEdit1.CopyToClipboard;

对Paste快速按钮的OnClick事件编程:

DBEdit1.PasteFromClipboard;

DBGrid1.SelectedField.AsString:=DBEdit1.Text;

此时,如果DBGrid1中的某一单元Cell数字需要粘贴另一单元Cell2的部分或全部内容,用鼠标单击选择Cell2,此时DBEdit1所显示的内容与Cell2的内容相同。在DBEdit1中用鼠标拖曳选择部分或全部内容,单击Copy快速按钮;再用鼠标单击选择Cell,此时DBEdit1所显示的内容与Cell相同,在DBEdit中欲粘贴刚才所选内容的位置插入光标,单击Paste快速按钮,则刚才所选内容插入到光标位置,Cell的内容也随之改变成插入后的内容,由此完成了一次Copy—Paste操作。

用这种方法实现Copy—Paste操作,比正常的操作多了一次鼠标的键击、两次鼠标的移动。在重复输入的内容不多,且操作者键盘输入很快很熟练的情况下,这种实现Copy—Paste的方法,意义似乎不大。但如果应用程序的使用者是那些并没有掌握某种快速文字输入技巧、很有可能还在使用拼音输入法的人,如果使用者对正常的Copy—Paste方法本来就不熟练(则感觉不到这种方法的不合常规),且又非常地善于在一长串的同音字里翻来翻去地寻找的话,这还是一种不错的方法。如果哪位读者有能在TDBGrid中实现常规Copy—Paste操作的方法,请不吝赐教。

以下是有关的程序代码:

procedureTUnitDetail.DBGrid1ColEnter(Sender:TObject);

begin

caseDBGrid1.SelectedIndexof

0:DBEdit1.DataField:=′UnitNum′;

1:DBEdit1.DataField:=′UnitName′;

2:DBEdit1.DataField:=′Header′;

3:DBEdit1.DataField:=′Address′;

4:DBEdit1.DataField:=′Tel′;

end;

end;

procedureTUnitDetail.SBCopyClick(Sender:TObject);

begin

DBEdit1.CopyToClipboard;

end;

procedureTUnitDetail.SBPasteClick(Sender:TObject);

begin

DBEdit1.PasteFromClipboard;

DBGrid1.SelectedField.AsString:=DBEdit1.text;

end;

Google Play Game不够开放,被OpenKit炮轰 Google Play Game Service详解 不仅提供API更提供后端支持 IBM Power走向Linux,是必然的! 美国国家安全局解密特工培训手册:如何利用谷歌等大众搜索工具搜集保密数据 微软IE10如何保护上网安全(大图) 谷歌无畏苹果的理由:强力的算法和基础设施架构 开发者热议异构统一内存访问技术(hUMA) 千万级并发实现的秘密:内核不是解决方案,而是问题所在! Apache RewriteRule重写规则语法入门 IDC:2013 Q1 Android和iOS出货量占92% WP首超黑莓 传雅虎欲10亿美元收购轻博客网站Tumblr A Beautiful Mess:如何赚男人女人的钱 CSS、JavaScript开发者必备的10款最佳工具 IBM推出API管理平台 抢占API经济市场份额 2013中国云计算榜单之一:15云平台,谁主沉浮? 移动周报:百万壁纸、85后程序媛,我为梦想代言! 电信天翼开放平台:为App开发者免费提供云存储和云主机服务 Google新的Web UI库:Ploymer 研发周报:让开发者高效编程的10个新框架 拯救行将就木的PHP:谷歌为GAE添加PHP支持 PPT集萃(一):10位业内高管分享云计算技术理念与行业趋势 得益于苹果谷歌,未来可穿戴技术市场规模可达500亿美元 雅虎11亿美元押注Tumblr三大因素:用户、社交、内容 Perceptual:英特尔感知计算挑战赛 正式启动 吴义坚:创业去!我用深度神经网络,处理语音识别 浅谈用户体验的“反面模式 可穿戴设备又一站:增强现实眼镜CastAR 数字医疗投资将破纪录 投资人看好这些细分领域 Mayer又下一城:雅虎收购Tumblr推进移动化? 前端开发利器:代码预处理工具Prepros 一个轻量级的JavaScript库:Reactor.js 请问哪里有maple下载 给100分 怎样才能更好的通过网络学习,不断的提高自己,大家各抒己见! google被封,上有政策,下有对策,想继续使用google的进来!!! 有kjava相关的资料或信息者请入 使用session问题 各位大侠,怎样在VB6中通过代码,控制SQLServer6中数据表的权限,如只读,可写,能删等。 谁知道哪有SCJP的英文原版教材下载呀? 为什么对话框的类都看不到析构函数! 请教一个SQL的问题 从局域网内拷贝文件,总是断线 问大家一个特别傻的问题,但是请务必帮我解答,谢谢了 问大家一个特别傻的问题,但是请务必帮我解答,谢谢了 treeView控件的问题 asp中的几个问题,急! 在类中用static const 定义常量的问题 谁安装oracle9i了? 哪里有文档编辑软件的源程序(带查找、替换),给url就给分? =最近做了一个免费小工具,想请大家帮忙测试并发表一些关于我的程序功能和界面布局的意见= 很急 [建议]关于提问 100分请教如何使用JS来实现定时执行alert()命令 请问怎样给DataGrid添加一个空行? 请问在用openssl生成csr时出现如下的问题,如何解决?急用 100感谢 =最近做了一个免费小工具,想请大家帮忙测试并发表一些关于我的程序功能和界面布局的意见= oracle 9i的问题,急救 24位的位图是不是没有颜色表? 一个简单的关于层的问题,谁能帮我解释一下呢? 请问在用openssl生成csr时出现如下的问题,如何解决?急用 100感谢 超菜问题? 现在网上有没有破解的MDaemon下载? 唉,和老妈吵架~散分~~ LyfUpload组件上传时能否添加下拉框,并把其值一起提交到数据库中?急!急!急! 请高手一览:为什么这段程序不能写进数据库?不好意思,分只有这么多了!呵呵 建立一个收费的网站的思路如何?请大家指教! 怎样改造Anythere 5.0的数据库? 有没有去过珠海的朋友? 我出100分重新讨论《100分求助:如何解决内存泄漏,代码如下》 有没有现成的软件,判断一个email的使用方的具体位置,到“市”一级? 用ADO能不能用SQL语句将Access2000库中的表复制到SQL2000server库中? maddam、Hankuu请进,重新给分。100分求助:如何解决内存泄漏,代码如下(无内容) javascript中如何控制<input type="image" id=id1 name=name1>的位置 如何用pb完成文件上传服务器的功能 有关ORACLE在ODBC内部的连接问题?? 经典砍价术 十个系男生的初夜 菜鸟没分了,还是慷慨散100分求助!(Up 有分) 求救,图像和文本一起上传 网络安全问题的一点疑问,欢迎大家来讨论,分数不够可以再加!!! Gnome桌面显示不出来? 请问VC和BCB哪个更好? Rational材料 修改病句:他从早晨到中午写了一天作业 ATP 是新陈代谢的直接能源,线粒体是有氧呼吸的供能物质,到底哪个才是供能物质啊!那糖类呢?脂质呢? 地球目前这些资源现在如何? 蛋白质合成所需模板在细胞核内形成 对不对 一般LED灯的环氧树脂胶需要多久才会固化? 线粒体在细胞核里面吗 设E为平面上以A(4,1),B(-1,-6),C(-3,-2)为顶点的三角形区域(包括边界),则z=4x-3y的最大值与最小值分别为A14,-18 B-14,-18 C18,14 D18,-14我错了,C(-3,2) 消除环境污染我们应该怎么办 幼时溺爱,长大了会造成悲剧举两个例子 物质通过核孔进入细胞核中时需要载体与能量吗? 现时期存在的环境污染, 已知D是以点A(4,1),B(-1,-6),C(-3,2)为顶点的三角形区域 超急~已知D是以点A(4,1),B(-1,-6),C(-3,2)为顶点的三角形区域(包括边界与内部),如图所示(1)写出表示区域D的不等式组(2)若点B(-1,-6),C(- 亲核蛋白进入细胞核由什么决定?需不需要消耗能量? 消除环境污染我们该做什么 我国2005年监测的523个城市空气质量情况如下:达到二级以上(含二级)标准334个,达到三级标准133个,未达到三级标准46个,求制成扇形统计图.只要告诉我这三个的度数就可以了(包括算式). 氨基酸能进入到细胞核中去吗,细胞核又不利用它啊?蛋白质通过核孔时,需要载体和能量吗? 我国属于多地震国家吗? 表示测量结果的三个要素是什么?测量工具和仪器不是一样的吗? 是谁绕着地球转了一圈 我国是多地震国家,原因是什么? casio有没有不用换电池的太阳能手表?姐姐 给个型号 我的意思是太阳能表也要换电池呀,有没有像全自动机械表那样一直带下去的 还有太阳能动力和全自动机械表那一种比较好 希望有详细介 我想知地球转动一圈,每秒转多远 经常发生地震的国家有哪些 卡西欧手表换电池后还能太阳能充电吗手表没看说明书就换电池去了,换了电池之后还能使用太阳能充电吗? 转地球一圈需要多少光年 镇江恒顺股份有限公司与镇江恒顺集团有限公司是同一个公司吗 环氧树脂电路板的耐温是多少?打算自己做一个热板,30*30cm大小,4欧姆,需加热到110摄氏度.现计划利用电路板中铜线的阻值来实现,但不知这样的温度是否对电路板比较苛刻?不知道环氧树脂的电 什么是生物的呼吸? 胃酸为什么不会腐蚀胃本身 如何快速固化环氧树脂且耐温? 修改病句并说明原因 我还把今天的作业没作完 胃会把自己腐蚀掉吗 环氧树脂是绝缘的么?能抗220V的电压么? 生物都能呼吸例如 地球是那几部分组成的 什么是身高,测量身高的要素有哪些?如题~ 生物为何要呼吸?是否是单纯地为了支持呼吸作用的进行? 做塑料袋的材料中有甲醛吗. 没有冷凝管,制取蒸馏水没有冷凝管,不知道这套装置能不能制取蒸馏水 冬天喝蜂蜜水好吗 资源浪费和环境污染的资料 人际关系需要韧性 意思是什么 我大约花了25分钟左右做完了数学作业.修改病句 物理电流方向基本概念问题只是概念不太理解而已,说规定正电荷方向为电流方向,那电路中一般不是自由电子移动的吗?电子是带负电的啊?请老师说明白一点, “韧”什么意思? 我大约花了25分钟完成这项工作.(修改病句)如何改? PTFE螺栓需要表面处理吗,如果不表面处理,可以耐高温110度,耐腐蚀吗(硫酸浓度5%) 《只有一个地球》的作者 用看过的爱国影片或人物传记,写一篇读后感或观后感.(真实感受)快!500字左右 热水器烧着烧着就闻到一股胶味怎么办,美的小天使牌子? 三条直线可以确定三个平面,这三条直线的公共点有? 最新英语电影观后感!要有:电影名字,主角,感受,主要内容.希望带中文,不带也可以.一共要2篇而已!这是寒假作业啊~所以很急啊!能在两天内交货的,加50分吧~ 3.MgO—Al2O3—SiO2系统的低共熔物放在Si3N4陶瓷片上 ,在低共熔温度下,求Si3N4表面张力3.MgO—Al2O3—SiO2系统的低共熔物放在Si3N4陶瓷片上 ,在低共熔温度下,液相的表面张力为900×10-3 N/m,液体和固体 在同一平面内,a,b,c是三条互不重合的直线,则他们的公共点的个数可以是几个? 一片观后感 观‘伦敦奥运有’有感 控制合成线粒体的基因是在细胞核中还是在线粒体中?这是有关克隆问题中的一个小题是提供细胞核的供体有一种特殊的线粒体,然后供体与减2分裂中期的卵细胞结合,最后移植到受体中,那么 在同一平面内,不重合的三条直线的公共端点个数可能有几个?A 0个,1个或2个B 0个,2个或3个C 0个,1个,2个或3个 为了增加橡胶产量,切口位置应靠近橡胶树-------部(顶、中、基)选择 SiO2,Si3N4,Si,多晶硅在集成电路中的性能及扮演的角色分别是什么? 在同一平面内不重合的三条直线,他们的公共端点可能有几个
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘