使用:vlr-pickfirstmodified reactor的问题解决

XDSoft

LISP: Problem using :vlr-pickfirstmodified reactor

Issue
Calling (entget) in my :vlr-pickfirstmodified callback causes AutoCAD to crash.

To reproduce this, load the Lisp code below, and then select a PViewport in a layout:

(vl-load-com)
(vl-load-reactors)
(vlr-miscellaneous-reactor nil (list (cons ':vlr-pickfirstmodified 'crash)))

(defun Crash (p1 p2 / sel ii)
   (setq sel (cadr (ssgetfirst))
           ii  0
   )
   (repeat (if sel (sslength sel) 0)
      (setq ent (ssname sel ii)
              ii  (1+ ii)
      )
      (entget ent)
   )
)

Solution
The reactor works fine when SDI= 1.  However, in a multiple-document environment (SDI=0), the problem arises.   Most likely, the entity can not be opened for write in your editor reactor (:vlr-miscellaneous-reactor is an editor reactor), because the document is not locked.  In an editor reactor, in MDI (SDI=0), the document is not automatically locked.  It is not possible to lock the document in Visual LISP, however it is possible in ObjectARX.  Thus, we can call ObjectARX functions from the Lisp code to work around the problem.

In the example below, we use ObjectARX (acedDefun) to define two functions, (lockdoc) and (unlockdoc), which can be called from the Lisp code:

游客，如果您要查看本帖隐藏内容请回复

/db_自贡黄明儒_

学习一下，到底怎么解决的

wzg356

这里让我恋恋不忘

13808843088

E文，一头雾水，看后面有能看懂的东西没

liulisheng

开源就支持

lisperado

saying thank you = good virtue

drshang

6666666666666666