开源

功能说明: 本程序是一个基于易语言编写的系统剪贴板操作模块，主要用于实现对 Windows 操作系统剪贴板的读写、管理及监控功能。通过分析代码中的子程序结构，可以看出该模块封装了底层的 Windows API 调用，为上层应用提供了便捷的文本和文件剪贴板交互接口。

程序的核心功能主要体现在以下几个公开子程序中：

1. 剪贴板文本读写功能：

通过“剪贴板_置文本”子程序，用户可以将指定的文本数据复制到系统剪贴板中。该功能内部实现了打开剪贴板、清空旧数据、分配全局内存、锁定内存写入数据、设置剪贴板数据句柄以及关闭剪贴板等一系列标准操作流程，确保文本数据能正确被其他程序粘贴。

通过“剪贴板_取文本”子程序，程序可以读取当前剪贴板中的文本内容。它会先检查剪贴板中是否存在文本格式数据，若存在则获取数据句柄并将其转换为易语言文本类型返回，同时负责释放相关的内存资源。

2. 剪贴板文件操作功能：

这是该模块的高级功能之一。“剪贴板_置文件”子程序允许将一个或多个文件路径复制到剪贴板，模拟用户在资源管理器中对文件执行“复制”或“剪切”操作。该子程序支持通过参数设置文件状态，区分是待移动（剪切）还是待粘贴（复制），内部使用了 DROPFILES 结构体及注册剪贴板格式（Preferred DropEffect）来实现这一细节。

“剪贴板_取文件”子程序则用于从剪贴板中获取文件列表。它可以返回剪贴板中包含的文件数量，并将文件路径填充到数组中。同时，它还能识别文件的操作状态（复制还是剪切），方便程序根据状态执行相应的粘贴或移动逻辑。

3. 剪贴板管理与查询功能：

“剪贴板_清空”子程序用于彻底清除剪贴板中的所有内容，释放占用资源。

“剪贴板_枚举当前可用格式”子程序用于查询当前剪贴板中支持的数据格式类型，返回格式数量及具体的格式 ID 数组，这对于处理非标准剪贴板数据或调试非常有用。

此外，程序包含了标准的易语言模块结构，如“_启动子程序”用于初始化，“_临时子程序”用于开发调试阶段的测试。代码中大量使用了 Windows API 函数，如 OpenClipboard、CloseClipboard、GlobalAlloc、SetClipboardData 等，体现了对系统底层资源的直接操作能力。内存管理方面，程序注意了内存的分配与释放（GlobalFree），防止内存泄漏。

综上所述，该程序是一个功能完善的易语言剪贴板处理库，适用于需要自动化操作剪贴板、实现文件批量复制粘贴辅助、或进行剪贴板监控的易语言软件开发场景。 

======程序集1

           |  |

           |  |------ _启动子程序

           |  |

           |  |------ _临时子程序

           |  |

           |  |------ 剪贴板_置文本

           |  |

           |  |------ 剪贴板_取文本

           |  |

           |  |------ 剪贴板_清空

           |  |

           |  |------ 剪贴板_置文件

           |  |

           |  |------ 剪贴板_取文件

           |  |

           |  |------ 剪贴板_枚举当前可用格式

           |  |

           |  |------ 剪贴板_取HTML

           |  |

           |  |------ 剪贴板_取图片

           |  |

           |  |------ 剪贴板_置图片

           |  |

           |  |

======其他

           |  |

           |  |------ 字节集_取长度

           |  |

           |  |------ 字节集_取空白

           |  |

           |  |------ 文本_到字节集

           |  |

           |  |------ 文本_取空白

           |  |

           |  |------ Utf8转ansi

           |  |

           |  |------ 图像_图片句柄取图片

           |  |

           |  |------ 图像_取图片句柄

           |  |

           |  |------ Release

           |  |

           |  |------ get_Handle

           |  |

           |  |------ _ToDword

           |  |

           |  |------ 动态调用子程序

           |  |

           |  |

======调用的Dll

           |  |

           |  |---[dll]------   OpenClipboard

           |  |

           |  |---[dll]------   SetClipboardData

           |  |

           |  |---[dll]------   CloseClipboard

           |  |

           |  |---[dll]------   GlobalLock

           |  |

           |  |---[dll]------   lstrlen

           |  |

           |  |---[dll]------   GlobalAlloc

           |  |

           |  |---[dll]------   GlobalUnlock

           |  |

           |  |---[dll]------   CopyMemory_文本

           |  |

           |  |---[dll]------   CopyMemory_dfs

           |  |

           |  |---[dll]------   CopyMemory_字节集

           |  |

           |  |---[dll]------   CopyMemory_整数

           |  |

           |  |---[dll]------   CopyMemory_整数2

           |  |

           |  |---[dll]------   GlobalFree

           |  |

           |  |---[dll]------   GetClipboardData

           |  |

           |  |---[dll]------   EmptyClipboard

           |  |

           |  |---[dll]------   IsClipboardFormatAvailable

           |  |

           |  |---[dll]------   RtlMoveMemory

           |  |

           |  |---[dll]------   lstrcpyn_字节集

           |  |

           |  |---[dll]------   lstrcpyn_文本

           |  |

           |  |---[dll]------   DragQueryFile

           |  |

           |  |---[dll]------   FillMemory

           |  |

           |  |---[dll]------   EnumClipboardFormats

           |  |

           |  |---[dll]------   RegisterClipboardFormat

           |  |

           |  |---[dll]------   MultiByteToWideChar_utf8

           |  |

           |  |---[dll]------   WideCharToMultiByte

           |  |

           |  |---[dll]------   DeleteObject

           |  |

           |  |---[dll]------   CreateStreamOnHGlobal

           |  |

           |  |---[dll]------   CLSIDFromString

           |  |

           |  |---[dll]------   OleLoadPicture

           |  |

           |  |---[dll]------   CopyImage

           |  |

           |  |---[dll]------   CallWindowProc

           |  |

           |  |---[dll]------   GetObject

           |  |

           |  |---[dll]------   CreateCompatibleDC

           |  |

           |  |---[dll]------   GetDIBits_BimapInfo

           |  |

           |  |---[dll]------   GetDIBits

           |  |

           |  |---[dll]------   CopyMemory_BITMAPINFO

           |  |

           |  |---[dll]------   CopyMemory_BITMAPFILEHEADER

           |  |

           |  |---[dll]------   DeleteDC

           |  |

           |  |---[dll]------   _P_INT32