脚印2012 发表于 2015-8-18 09:31:27

cad样条曲线围成的面积查询

关于样条曲线围成的小道面积的问题。按理说在cad中查询面积都是小菜，不值得一提，但样条曲线却不行了，什么aa、li、图形填充、面域、bo，全试了一遍，还真有点意思，明明填充好了就是查不出面积，现在的方法是用pl线描，这个太麻烦，工程量大的情况下自是不可取，看看明经高手们有什么高见，求编出一个LISP查询由样条曲线围成的阴影部分的面积？


434939575 发表于 2015-8-18 10:05:42

(defunc:tt()
(setq a (car(entsel)))
(setq obj(vlax-ename->vla-objecta))
(setq area(vla-get-areaobj ))

)

cable2004 发表于 2015-8-18 10:39:20

本帖最后由 cable2004 于 2015-8-18 11:35 编辑

(defunc:tt() (Vlax-Get (Vlax-Ename->Vla-Object (car (entsel))) 'Area))(vL-Load-com)

脚印2012 发表于 2015-8-18 11:00:46

lisp测试没通过，能调整下吗

cable2004 发表于 2015-8-18 11:35:35

脚印2012 发表于 2015-8-18 11:00 static/image/common/back.gif
lisp测试没通过，能调整下吗

(defunc:tt() (Vlax-Get (Vlax-Ename->Vla-Object (car (entsel))) 'Area))(vL-Load-com)
页: [1]
查看完整版本: cad样条曲线围成的面积查询