在dbgrid中实现copy、paste功能(2) (2001年3月17.txt

自己对DELPHI学习的一点体会

在DBGrid中实现Copy、Paste功能(2) (2001年3月17日) 

网友更新  分类:数据库   作者:pipi_lu  推荐:pipi_lu   阅读次数:238  
(http://www.codesky.net)  

--------------------------------------------------------------------------------
具体方法:在已设计好的包含有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操作。
 
 


--------------------------------------------------------------------------------