大家有什么算面积比较快捷的方法？？？

oぃ夢ゞ舞風雲ヤ · 发表于 2013-8-12 14:16

大家有什么算面积比较快捷的方法？？？
我是先bo然后aa空格o空格，但感觉还是不太方便？

oぃ夢ゞ舞風雲ヤ · 发表于 2013-8-12 14:16

求帮助？？？

oぃ夢ゞ舞風雲ヤ · 发表于 2013-8-12 14:17

求大神指点

oぃ夢ゞ舞風雲ヤ · 发表于 2013-8-12 14:17

有木有大侠来指点下？？？

xhq1954425 · 发表于 2013-8-12 15:07

用程序！

oぃ夢ゞ舞風雲ヤ · 发表于 2013-8-12 15:20

用程序！- b: N w0 R2 T
xhq1954425 发表于 2013-8-12 15:07

？？？什么程序？？

oぃ夢ゞ舞風雲ヤ · 发表于 2013-8-12 15:20

可不可以在具体点？

oぃ夢ゞ舞風雲ヤ · 发表于 2013-8-12 17:50

论坛人怎么这么少？？？来个大虾讲解下！！！

zhjl1212 · 发表于 2013-8-12 20:53

li试一下

zhjl1212 · 发表于 2013-8-12 20:54

前提是要是一个闭合的图形

xhq1954425 · 发表于 2013-8-12 23:00

回复 6# oぃ夢ゞ舞風雲ヤ

现编一个，你只要左键依次点选封闭区域内部点后回车就出结果了：
(defun c:MJ ( / ENT ES I OBJ P0 S SS)
  (vl-load-com)
  (command "vscurrent" "C")
  (princ "\n ****本程序为求多个封闭区域的面积之和****")
  (setq ss (ssadd))
  (while (setq p0 (getpoint"\n拾封闭区域取内部点:<退出>"))
      (COMMAND "._BOUNDARY" "A" "O" "R" "" p0 "")
      (ssadd (entlast) ss)
　)　
  (setq i 0 ES 0)
  (repeat (sslength ss)
(setq ent (ssname ss i))
(setq obj (vlax-ename->vla-object ent))
(setq s (vla-get-Area obj))
(setq es (+ es s))
(setq i (1+ i))
  )
  (command "erase" (ssget "X" '((0 . "REGION"))) "")
  (command "vscurrent" "2")
  (princ (strcat "总面积为：" (rtos es)))
  (princ)
)

oぃ夢ゞ舞風雲ヤ · 发表于 2013-8-14 14:49

前提是要是一个闭合的图形
; y5 y* k- ?) l8 Mzhjl1212 发表于 2013-8-12 20:54

试了下感觉和aa没啥区别吖？？？只不过少了几个步骤

oぃ夢ゞ舞風雲ヤ · 发表于 2013-8-14 14:50

回复 oぃ夢ゞ舞風雲ヤ 2 o% f! D( _% h+ W) ?( T
+ W+ s& _: @- s0 e* U: o
- C7 K ~1 ?; b) @
现编一个，你只要左键依次点选封闭区域内部点后回车就出结果了：
: }6 t1 z9 u" ~1 w(defun c: ...! o4 K0 N" D) p# \2 J
xhq1954425 发表于 2013-8-12 23:00

这个程序要怎么用？？？

gzhaj_813 · 发表于 2013-8-14 16:38

比较快的方法是用PL线圈圈，看属性

oぃ夢ゞ舞風雲ヤ · 发表于 2013-8-14 16:44

比较快的方法是用PL线圈圈，看属性
: M9 ~. C7 q3 I6 a5 Cgzhaj_813 发表于 2013-8-14 16:38

比如这种图，这得圈到啥时候吖

		自动登录	找回密码
密码			立即注册

[求助] 大家有什么算面积比较快捷的方法？？？

本帖子中包含更多资源