本帖最后由 print1985 于 2021-8-10 17:49 编辑
 - (vlax-remove-cmd "killhelp") ;删除已注册命令
- (defun khelp ()(princ "\n已干掉帮助")(princ))
- (vlax-add-cmd "killhelp" 'khelp) ;注册为CAD内部命令
- (vla-SendCommand (vla-get-ActiveDocument (vlax-get-acad-object)) "killhelp ") ;打开图形即发送命令
以上代码自动加载试试
|