社区 › Auto Lisp › 与多段线点的距离

GP_ 发表于 2022-7-6 09:22:27

 
将0替换为1.57079633
 
 
 

.............................
.............................
.............................
(vlax-3d-point
    (mapcar (function (lambda (a b) (/ (+ a b) 2.))) pt pt2)
)
0
)
   )
   )
)(princ)
)

Least 发表于 2022-7-6 09:27:36

又好又简单。谢谢

pBe 发表于 2022-7-6 09:28:15

 
你“认为”你可能也必须这样做
（setq RefL（ssget“_：E:S:L”'（（0.*行”）））；
 
因为这次错误发生在选择多段线之后

pBe 发表于 2022-7-6 09:33:36

 
嗯，是吗？
 
|
|
|
\/
 
 

Least 发表于 2022-7-6 09:36:02

 
谢谢pBe

martinle 发表于 2022-7-6 09:40:41

 
它起作用了！
 
非常感谢。
 
问候Martin

查看完整版本: 与多段线点的距离