yoyoho 发表于 2016-7-1 00:07:52

;;;选择集返回图元名组成的表


(defun ss->enamelst (ss / enames)
       (setq i 0)
       (while (< i (sslength ss))
            (setq enames (cons (ssname ss i) enames ))
            (setq i (1+ i))
       )
       (reverse enames)
)

xinxirong 发表于 2016-7-1 09:16:47

再给一个坑吧：天正对象entmod会偶尔崩溃，不解决这个问题，除非用vla，但vla接口不全。

vectra 发表于 2016-7-1 10:08:55

楼主能否放个例子上来 原来的程序可能有BUG 设计是能够处理嵌套块的。
页: 1 [2]
查看完整版本: 关于z值归0，论坛里面所有lisp都不能支持嵌套快