明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1265|回复: 9

[提问] 求段:清空剪切板 源码

[复制链接]
发表于 2020-4-18 16:31:13 | 显示全部楼层 |阅读模式
如题,不知谁有吗?
"觉得好,就打赏"
还没有人打赏,支持一下
发表于 2020-4-22 14:00:09 | 显示全部楼层
(setq Clip_board (Vlax-Get-Property (Vlax-Get (vlax-create-object "htmlfile") 'ParentWindow) 'ClipboardData))
(Vlax-Invoke Clip_board 'clearData)

点评

很好用  发表于 2020-4-22 21:10
回复 支持 2 反对 0

使用道具 举报

发表于 2020-4-18 17:26:30 | 显示全部楼层
(N粘帖板 "")
;向系统剪粘帖板中写入文字
(defun N粘帖板(STR / HTML RESULT)
(and (= (type STR) 'STR)
(setq HTML (vlax-create-object "htmlfile"))
(setq RESULT(vlax-invoke(vlax-get(vlax-get HTML 'PARENTWINDOW)'CLIPBOARDDATA)'SETDATA"Text"STR))
(vlax-release-object HTML)) )

点评

看明白了,似乎可以  发表于 2020-4-18 17:29
 楼主| 发表于 2020-4-18 17:29:00 | 显示全部楼层
669423907 发表于 2020-4-18 17:26
(N粘帖板 "")
;向系统剪粘帖板中写入文字
(defun N粘帖板(STR / HTML RESULT)

看到过这段,我想,不管剪切板有什么,想清空的代码,这个修改下可以?
发表于 2020-4-18 17:31:10 | 显示全部楼层
可以的,你试试
发表于 2020-4-21 09:58:48 | 显示全部楼层
清空剪切板,往剪切板放置为空的文字
,是两个概念。

点评

对啊,但是,上面写个空文字,是可以解决问题的。  发表于 2020-4-21 10:14
 楼主| 发表于 2020-6-9 21:03:30 | 显示全部楼层
chenbj0 发表于 2020-4-22 14:00
(setq Clip_board (Vlax-Get-Property (Vlax-Get (vlax-create-object "htmlfile") 'ParentWindow) 'Clipbo ...

这段代码才是正确的做法。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-23 07:40 , Processed in 0.154769 second(s), 27 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表