samifox 发表于 2022-7-6 06:27:16

无法访问selecti的成员

你好
 
我试图选择几个多段线，它们的所有顶点坐标到一个列表中。由于某些原因，选择集正确地显示了成员的数量，但我不能用ssname逐个调用它们
 
知道吗？
 
谢谢
谢伊
 

(defun C:DEMO (/ pl pts sspl tpts)


   (setq sspl (ssget '((0 . "LWPOLYLINE")))) ;_select all polylines and assign them to a selection set sspl
   (setq i 1)
   
   (setq tpts 0)
   (while (<= i(sslength sspl))
   (setq pts (mapcar 'cdr
             (vl-remove-if-not
               '(lambda (e)
                  (= (Car e) 10)
                  )
                (entget(ssname sspl 1))
             )
         )
   )
   (setq i (1+ i))
   
   
   
   )
   (setq tpts (+ tpts pts))
)

;_run a loop that extract all vertices from all sset members
;_loop vert list
;_create a temp line between 2 points
;_gets its length
;_get its angle
;_if the distance is less than x
;_if the angle is between w and z
;_isolate those verts
;_create a rectangle

 
这是干什么的？
 

(entget (ssname sspl i))

Tharwat 发表于 2022-7-6 06:54:36

它是我而不是1，但仍然无法访问除0成员之外的任何成员
 
Pts是回路中多边形的点列表
TPT是一个包含pts列表的列表

samifox 发表于 2022-7-6 07:11:52

 
这
 

(setq tpts (+ tpts pts))

Tharwat 发表于 2022-7-6 07:16:01

谢谢，我现在在iPad上
我稍后再测试

samifox 发表于 2022-7-6 07:38:45

页: [1]
查看完整版本: 无法访问selecti的成员