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

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

用程序！& _8 [7 H7 z$ R2 c q4 S
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

前提是要是一个闭合的图形
# r4 U" m) j9 w" hzhjl1212 发表于 2013-8-12 20:54

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

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

回复 oぃ夢ゞ舞風雲ヤ
' `# ]: N. T* T8 L) O* D H9 v2 h w

4 S5 B0 n: ~' w' E 现编一个，你只要左键依次点选封闭区域内部点后回车就出结果了：
) v1 e% v) q' y. E' w9 p4 C(defun c: ...+ W- [: X9 l1 \* b: P
xhq1954425 发表于 2013-8-12 23:00

这个程序要怎么用？？？

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

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

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

比较快的方法是用PL线圈圈，看属性: V% _5 g# ^, Q
gzhaj_813 发表于 2013-8-14 16:38

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

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

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

本帖子中包含更多资源