cshimao
发表于 2022-12-14 13:20:31
别藏了,想看你的真面目。。。。。。。。。。。
LIULISHENG
发表于 2022-12-19 15:16:39
支持支持支持
LIULISHENG
发表于 2022-12-19 15:19:38
支持支持支持
p-3-ianlcc
发表于 2022-12-20 11:39:50
好神秘…
很好奇是什麽东西,回复看一下
谢谢分享!
hzyhzjjzh
发表于 2022-12-20 12:51:31
谢谢分享,{:1_1:}
wudechao
发表于 2022-12-21 00:06:07
谢谢分享,看看什么宝贝
22千里之外
发表于 2022-12-21 17:00:20
学习下,谢谢分享。
77077
发表于 2023-1-17 10:11:19
杀猪杀屁股,另外一种搞定方法,请举证推翻。
(and
(setq curve(car(entsel "\n选择对象:")))
(= (vlax-curve-getEndParam curve) 4)
(vlax-curve-isClosed curve)
(setq d1 (vlax-curve-getDistAtParam curve 1))
(setq d2 (- (vlax-curve-getDistAtParam curve 2) d1))
(equal (vlax-curve-getArea curve) (* d1 d2) 1e-6);判断矩形面积公式是否成立
)
mojianxing
发表于 2023-12-21 15:06:22
谢谢大佬分享!看看什么好东西!