精易模块的 剪贴板_监听 问题

星星之夜

如图所示


调用后，无论剪辑板是否有内容
都会返回一次766。


在硬要一定要调用 剪贴板_监听( , ) 的情况下
请问能否解决这个问题？

感谢

小李吃不饱

https://bbs.125.la/forum.php?mod ... _%E7%9B%91%E5%90%AC 看看这个？

熬夜

https://bbs.125.la/forum.php?mod ... 7454&highlight= 一个小的原理

lyjzyq

.版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕


剪贴板_监听 (取窗口句柄 (), &WndProc)


.子程序 _按钮1_被单击

清除剪辑板 ()




.子程序 WndProc, 整数型, , 回调函数  这里可以不用返回
.参数 hwnd, 整数型
.参数 uMsg, 整数型
.参数 wParam, 整数型
.参数 lparam, 整数型

.判断开始 (uMsg ＝ #WM_DESTROY)
    ' 销毁 ()
.判断 (uMsg ＝ #WM_DRAWCLIPBOARD)
    ' 当剪贴板的内容变化时发送此消息给剪贴板观察链的第一个窗口;它允许用剪贴板观察窗口来显示剪贴板的新内容
    .判断开始 (取剪辑板文本 () ＝ “”)
        返回 (1)

    .默认
        调试输出 (“有剪辑版内容变化”)
    .判断结束








.判断 (uMsg ＝ #WM_CHANGECBCHAIN)
    ' 当一个窗口从剪贴板观察链中移去时发送此消息给剪贴板观察链的第一个窗口
.默认

.判断结束

返回 (0)


.子程序 __启动窗口_将被销毁

剪贴板_停止监听 (取窗口句柄 ())

lyjzyq

lyjzyq 发表于 2024-4-15 10:03
.版本 2
.支持库 spec

精易模块的 剪贴板_监听 问题 [修改]

lyjzyq

具体在lyjzyq的帖中