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

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

用程序！
1 S/ b4 Z+ C5 o! L9 S, L9 S. Kxhq1954425 发表于 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

前提是要是一个闭合的图形: v5 V D7 D* P1 f) R) S9 @7 c
zhjl1212 发表于 2013-8-12 20:54

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

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

回复 oぃ夢ゞ舞風雲ヤ
! o/ y+ i' |6 h/ f P8 ~7 C, h5 F* ?5 |( {9 v$ H
, _& |$ h5 r( U2 m: D. A5 Z: @" Q$ u
现编一个，你只要左键依次点选封闭区域内部点后回车就出结果了：0 ^8 k7 e4 ^' d2 }8 j- s1 N
(defun c: ...: P! q2 B) s, y% `8 `+ c; l
xhq1954425 发表于 2013-8-12 23:00

这个程序要怎么用？？？

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

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

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

比较快的方法是用PL线圈圈，看属性5 O+ M0 T% h+ I4 l7 \# ?- u
gzhaj_813 发表于 2013-8-14 16:38

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

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

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

本帖子中包含更多资源