利用易语言系统API监视系统剪贴板

在编写程序时，有时我们需要监视系统剪贴板的内容。使用系统API可以高效地实现这一功能，而不必依赖耗费系统资源的定时器。下面将介绍如何在易语言中利用系统API监视系统剪贴板。

创建监视与停止监视子程序

首先，我们需要创建两个子程序，一个用于开始监视剪贴板，另一个用于停止监视。通过调用这两个子程序，我们可以在程序中灵活控制监视剪贴板的启动和停止。

导入所需API

在易语言中，导入以下代码可以获取所需的API函数：

```

.版本 2

.DLL命令 API_监视剪贴板, 整数型, "user32", "SetClipboardViewer", , 在CLIPBOARD浏览器链中加入窗口

.参数 hwnd, 整数型

.DLL命令 API_停止监视剪贴板, 整数型, "user32", "ChangeClipboardChain", , 从剪贴板查看窗口上删除一个窗口

.参数 hwnd, 整数型

.参数 hWndNext, 整数型

.DLL命令 API_置窗口特征, 子程序指针, , "SetWindowLongA"

.参数 窗口句柄, 整数型

.参数 要置的特征, 整数型

.参数 新特征, 子程序指针

.DLL命令 API_执行窗口程序, 整数型, , "CallWindowProcA"

.参数 程序指针, 子程序指针

.参数 窗口句柄, 整数型

.参数 消息, 整数型

.参数 参数1, 整数型

.参数 参数2, 整数型

.DLL命令 API_发送消息, 整数型, "user32", "SendMessageA", , 调用一个窗口的窗口函数，将一条消息发给那个窗口

.参数 窗口句柄, 整数型, , 要接收消息的那个窗口的句柄

.参数 信息值, 整数型, , 消息的标识符

.参数 参数一, 整数型, , 具体取决于消息

.参数 参数二, 整数型, , 具体取决于消息

```

添加常量数据

为了完善监视剪贴板的功能，我们还需要添加一些常量数据：

```

.版本 2

.常量 WM_DESTROYCLIPBOARD, "775", , 当调用ENPTYCLIPBOARD函数时发送此消息给剪贴板的所有者

.常量 WM_DRAWCLIPBOARD, "776", , 当剪贴板的内容变化时发送此消息给剪贴板观察链的第一个窗口；它允许用剪贴板观察窗口来

.常量 WM_CHANGECBCHAIN, "781", , 当一个窗口从剪贴板观察链中移去时发送此消息给剪贴板观察链的第一个窗口

```

添加程序集变量

在程序集中添加两个变量，以便在代码中使用：

```

.版本 2

.程序集变量 默认窗口程序, 子程序指针

.程序集变量 前一监视句柄, 整数型

```

编写开始监视与停止监视子程序

在开始监视子程序中，添加以下代码：

```

前一监视句柄 API_监视剪贴板(_启动窗口.取窗口句柄())

默认窗口程序 API_置窗口特征(_启动窗口.取窗口句柄(), -4, 处理消息)

```

在停止监视子程序中，添加以下代码：

```

API_置窗口特征(_启动窗口.取窗口句柄(), -4, 默认窗口程序)

API_停止监视剪贴板(_启动窗口.取窗口句柄(), 前一监视句柄)

```

通过调用“开始监视”和“停止监视”子程序，我们可以方便地在易语言程序中实现监视系统剪贴板的功能。

版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。