kingofauto 发表于 2005-6-1 21:14:00

请问这样的画线命令用lisp好写吗?

王咣生 发表于 2005-6-1 21:56:00

使用:


命令: multiplex_1,然后选择一条多义线,将所选多义线解释成下图所示:


        (当然参数可以自已设置)




kingofauto 发表于 2005-6-2 08:52:00

正在看,水平不够。谢了!

贱人 发表于 2005-6-2 09:22:00

2楼,2002好象不行,一选多义线就退出了

meflying 发表于 2005-6-2 13:01:00

选择是PLINE画的线,不是SPLINE画的线

贱人 发表于 2005-6-2 17:48:00

pl画的也退出啊,一点反应都没


能不能改成不管选什么spl,pl,l,a,c线都可以的就好了

龙龙仔 发表于 2005-6-6 08:29:00

;;2楼程序欠VLAX-MAKEOBJECT,VLAX-MODELSPACE,VLAX-GETVERTEXLIST函数
;;只好猜想功能重写,程序对云形化的pline无效!
(load "acetutil2.fas" NIL)
(vl-load-com)
(defun VLAX-MODELSPACE ()
   (vla-get-modelspace
       (vla-get-activedocument (vlax-get-acad-object))
   )
)
(defun VLAX-MAKEOBJECT (OB)
   (if (= (type OB) 'ENAME)
       (vlax-ename->vla-object OB)
       OB
   )
)
(defun VLAX-GETVERTEXLIST (NA)
   (ACET-GEOM-VERTEX-LIST (vlax-vla-object->ename NA))
)

jxphklibin 发表于 2009-1-13 08:31:00

<p>程序不能用,不管多段线,还是什么,都退出!</p>
页: [1]
查看完整版本: 请问这样的画线命令用lisp好写吗?