国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學院 > 開發設計 > 正文

在DBGrid中實現Copy、Paste功能

2019-11-17 05:38:54
字體：大 中 小
來源：轉載
供稿：網友
   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:=Unit？Num;
　 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;

上一篇：S-DES

下一篇：控制C++的內存分配

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 平原县| 大田县| 长顺县| 来凤县| 定南县| 普兰县| 湘乡市| 工布江达县| 民丰县| 区。| 斗六市| 广东省| 奉化市| 汝阳县| 赤水市| 南投市| 屯昌县| 滨州市| 麦盖提县| 玉树县| 渑池县| 绥中县| 华蓥市| 山阴县| 南昌市| 百色市| 四子王旗| 乌鲁木齐县| 克拉玛依市| 兖州市| 江孜县| 台南市| 法库县| 澜沧| 双牌县| 辽源市| 垫江县| 铅山县| 吐鲁番市| 五河县| 黔江区|