[编程申请]：求“隐藏实体”与“取消隐藏”程序，希望能在AutoCAD R14或

同心

*-*6
在晓东工具0.29[工具1]中有相应的程序，但每次使用都要去点取菜单选择，不方便。因工作中需要连续多次使用（甚至于上100次以上）“隐藏实体”与“取消隐藏”命令，通过菜单选取命令不便。
通过命令行输入_XDTB_EntityOFF或_XDTB_EntityON可以完成任务，但命令太长不简捷，不知如何实现简化命令。


;;;隐藏实体
(defun c:qa ()
(command "_XDTB_EntityOFF")
(princ)
)

;;;取消隐藏
(defun c:qw ()
(command "_XDTB_EntityON")
(princ)
)

按上面的方式处理，运行不成功，如何修改？

gysjy

试试
(defun c:qa ()
(c: _XDTB_EntityOFF)
(princ)
)
前提是先加载_XDTB_EntityOFF。