DELPHI经典编程入门(7)参照.pdfVIP

[Delphi 园地 ] 第七章 剪贴板和动态数据交换（一） 应用程序间的数据交换是象 Windows 这样的多任务环境的重要特性。作为一种基于 Windows的开发工具， Delphi 支持如下四种数据交换方式：剪贴板、动态数据交换 ( DDE) 、对象联接与嵌入 (OLE)以及动态联接库 (DLLs) 。这 中间前三种方式最为常用， OLE功能最为强大， DDE次之。而剪贴板使用最为方便。在本章，我们只讨论剪贴板和动态数 据交换。利用 OLE实现数据交换见下一章，利用动态联接库 (DLLs) 进行数据交换将在第十章中介绍。 7.1 剪贴板及其应用 本质上，剪贴板只是一个全局内存块。当一个应用程序将数据传送给剪贴板后，通过修改内存块分配标志， 把相关内存块的所有权从应用程序移交给 Windows自身。其它应用程序可以通过一个句柄找到这个内存块，从而能够从 内存块中读取数据。这样就实现了数据在不同应用程序间的传输。 剪贴板虽然功能较为简单，且不能实现实时传输，但却是更为复杂的 DDE和OLE的基础。对于一些只是偶尔需要 使用其它应用程序数据的程序来说，使用剪贴板不失为一种方便、快捷的方式。 Delphi 把剪贴板的大部分功能封装到一个 TClipboard 类中，同时把使用频度最高的文本传输功能 ( 包括 DBImage的图像传输功能 ) 置入相应部件作为部件的方法，从而使用户可以十分方便地使用剪贴板进行编程。 7.1.1 使用剪贴板传输文本 剪贴板传输文本主要是应用如下的三个方法 :CopyToClipboard 、CutToClipboard 和PasteFromClipboard 。包含这些方 法的部件如下表所示。 表7.1 包含剪贴板方法的部件 ━━━━━━━━━━━━━━━━━━━━━━━━━━━ 方 法 部 件 ——————————————————————————— TDBEdit TDBMemo TDBImage CopyToClipboard TEdit TMemo TMaskEdit TOLEContainer TDDEServerItem ——————————————————————————— TDBEdit TDBMemo CutToClipboard TDBImage TEdit TMemo TMaskEdit ——————————————————————————— TDBEdit TDBMemo PasteFromClipboard TDBImage TEdit TMemo TMaskEdit ━━━━━━━━━━━━━━━━━━━━━━━━━━━ 除TDBImage外，其余全是有关文本的控件。 在把文本传输到剪贴板之前，文本必须被选中。 若选TMaskEdit 的AutoSelect 属性为 True ，则当MaskEdit 获得输入焦点时文本自动被选中；若选 TEdit 、 TMemo的HideSelection 属性为 True ，则失去焦点时，文本选中状态自动隐藏，重新获得焦点时再显示。 下面的语句把 MaskEdit 中选中的文本剪切到剪贴板： MaskEdit .CutToClipboard; 下面的语句把剪贴板中的文本粘贴到 Memo的当前光标处： Memo.PasteFromClipboard ； 利用剪贴板类也可以实现文本的传输，见 (7.1.2) 中的介绍。 7.1.2 剪贴板类 为方便剪贴板的操作， Delphi 在Clipbrd 库单元中定义了一个 TClipboard 类，并且预定义了一个变量 Clipboard 作为类 TClipboard 的实例，从而使用户在绝大多数场合不必自己去定义一个 TClipboard 的实例。 利用剪贴板类可以进行文本、图像和部件的传输，剪贴板类为实现这些