- 1PS提示：因为图层已锁定，无法编辑图层的处理方法
- 2Adobe Illustrator CS5 序列号大全
- 3picacg苹果版怎么找不到|picacg ios版是不是下架了介绍
- 4ACDsee注册码免费分享（含ACDsee18、ACDsee10等版本）
- 5苹果iphone自动时间不准确的多种校正方法
- 6PDF浏览器能看3D文件吗？PDF浏览器看3D文件图文详细教程
- 7Potato(马铃薯聊天)怎么注册不了|Potato不能注册处理方法介绍
- 8Potato(土豆聊天)怎么换头像|Potato app更改头像方法介绍
- 9ipad版office如何激活? office365激活的图文说明教程
- 10最新的Adobe Illustrator CS4序列号大全
- 11Mac怎么通过设置VPN来登录youtube等国外网站
- 12眼萌app怎么色弱测试 眼萌app色弱测试图文说明教程
[摘要]工具条上的Cut、Copy和Paste加速按钮，对于使用Windows下编辑器的人来说，恐怕都是非常熟悉而且不可缺少的。Delphi中的有些控件，如:TDBEdit、TDBImage、TDBMemo、TEdit等，具有CutToClipboard、CopyToClipboard和PasteFrom...
工具条上的Cut、Copy和Paste加速按钮，对于使用Windows下编辑器的人来说，恐怕都是非常熟悉而且不可缺少的。Delphi中的有些控件，如:TDBEdit、TDBImage、TDBMemo、TEdit等，具有CutToClipboard、CopyToClipboard和PasteFromClipboard方法，在这些控件上，利用这几个方法，只要通过简单的编程，就可以实现上述加速按钮。但TDBGrid控件却不提供上述方法，无法直接实现这几种功能。而在单机的数据库应用程序中，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操作的方法，请不吝赐教。
以下是有关的程序代码:
procedure TUnitDetail.DBGrid1ColEnter(Sender:TObject);
begin
case DBGrid1.SelectedIndex of
0:DBEdit1.DataField:='UnitNum';
1:DBEdit1.DataField:='UnitName';
2:DBEdit1.DataField:='Header';
3:DBEdit1.DataField:='Address';
4:DBEdit1.DataField:='Tel';
end;
end;
procedure TUnitDetail.SBCopyClick(Sender:TObject);
begin
DBEdit1.CopyToClipboard;
end;
procedureTUnitDetail.SBPasteClick(Sender:TObject);
begin
DBEdit1.PasteFromClipboard;
DBGrid1.SelectedField.AsString:=DBEdit1.text;
end;
推荐资讯 总人气榜
最新教程 本月人气
- 1浅谈Asp.net多层架构中的变量引用与传递
- 22栏分页显示（附显示的形式前页，后页）
- 3使用DB2look 重新创建优化器访问计划(4)
- 4Java+XML学习Step by step（3）
- 5使用ASP完成对表的分页浏览（下）
- 6图形显示方式屏幕的保存与恢复
- 72种统计当前在线人数的方法
- 8写了个Telnet Server
- 9获得当前进程的下文
- 10使用ASP完成对表的分页浏览（上）
- 11Zend Studio 3.0试用手记
- 12VB填充IE上的输入框并提交
- 1uc浏览器去广告图文说明教程：uc浏览器广告过滤技巧使用方法_绿茶安卓网
- 2字符串根据多个字符进行分割的一种方法
- 3使用c#制作容易的留言板(1)
- 43星s5电信版支持4g吗？3星galaxy s5电信版支持4g网络吗？
- 5nubia x6电信版什么时候上市？中兴nubia x6电信版上市时间
- 6华为p7移动版什么时候上市？华为p7手机移动版上市时间
- 7联想黄金斗士s8预约图文说明教程(附联想s8预约网址)
- 8联想黄金斗士s8加持版与规范版的区别有哪一些？s8加持版/规范版区别
- 9美颜相机声音如何关？美颜相机关声音方法_绿茶安卓网
- 10陌陌如何举报？陌陌举报好友图文说明教程_绿茶安卓网
- 11陌陌群聊如何@别人？陌陌群聊@别人方法_绿茶安卓网
- 123星s4手势感应如何用？3星Galaxy s4手势感应视频图文说明教程
