能否借助自动存盘时执行自定义的函数？

挚友01 · 发表于 2021-7-27 14:03:42

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

自动存盘是哪个命令?能否将其重新定义，在一段时间后自动执行自定义的Vlisp?

tzfcn · 发表于 2021-7-27 17:55:42

感觉应该可以，类似于VBA的事件前响应

yangjian001 · 发表于 2021-7-28 07:12:11

做一个热心并受欢迎的人

挚友01 · 发表于 2021-7-28 15:50:13

实际图形的放大缩小是最直接的，但如何在内存加入“反映器”检查鼠标中键的动作？

tzfcn · 发表于 2021-7-29 19:19:53

转载自：https://www.leanwind.com/archives/3896.html

在AutoCAD中我们可以使用AutoLISP的vlr-command-reactor函数来监听文件的保存事件FileOnSave，当监听到此命令时可以自动执行AutoLISP脚本来完成相应的工作。整个流程代码如下：
(defun AtSaveCommand (calling-reactor b)
(if
(or
(= (car b) "QSAVE")
(= (car b) "SAVEAS")
(= (car b) "SAVE")
)
(保存文件时要执行的代码)
)
)
(defun loadTheSaveReactor ()
(vl-load-com)
(if *FileOnSave* (vlr-remove *FileOnSave*))
(setq *FileOnSave*
(vlr-command-reactor nil '((:vlr-commandwillStart . AtSaveCommand)))
)
)
(loadTheSaveReactor)

使用此流程时需要注意：（1）不能在代码中执行更改即将保存的AutoCAD文档内容的命令，因为更改AutoCAD文档内容后必须再次执行保存动作，这样会造成死循环；（2）可以在此流程中执行对话框相关命令。

挚友01 · 发表于 2021-9-15 15:00:26

感谢感谢，研究研究...

挚友01 · 发表于 2021-9-15 15:14:45

检测CAD本身的命令是可以的，但对鼠标中键（平移）。。。

挚友01 · 发表于 2021-9-16 13:34:07

能否用反映器监测鼠标的移动？

账号		自动登录	找回密码
密码			立即注册

[研讨] 能否借助自动存盘时执行自定义的函数？

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。