群码的坐标值不见了？

Aled

我想要使用activex方式画一个方形，图可以画出来，可是当我观看它的群码，却发现群码的内容不完整，只能显示到第一个坐标值，其它点的坐标竟然消失了，可是画出来的图并没错，请问这是什么原因呢？

程序代码：

(defun test()
  (vl-load-com)
  (setq acadobject (vlax-get-acad-object))
  (setq dwgs (vla-get-activedocument acadobject))
  (setq mspace (vla-get-modelspace dwgs))
  (setq VLADataPts (vlax-make-variant
       (vlax-safearray-fill
         (vlax-make-safearray vlax-vbdouble (cons 0 14))
                '(0 0 0 0 127000 0 127000 127000 0 127000 0 0 0 0 0))))
  (vla-Addpolyline mspace VLADataPts)
  (princ)
)

群码：

Select object: ((-1 . <Entity name: 7ef5ef90>) (0 . "POLYLINE") (330 . <Entity
name: 7ef5ecf8>) (5 . "EA") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 .
"0") (100 . "AcDb2dPolyline") (66 . 1) (10 0.0 0.0 0.0) (70 . 0) (40 . 0.0) (41
. 0.0) (210 0.0 0.0 1.0) (71 . 0) (72 . 0) (73 . 0) (74 . 0) (75 . 0))

meflying

仔细查查LWPOLYLINE和POLYLINE两种类型的区别

LWPOLYLINE使用AddLightweightPolyline