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

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

用程序！: {# u+ | [5 r% y* n% `
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

前提是要是一个闭合的图形/ F$ [5 _" `+ ?% h: h) n' x6 j# ]
zhjl1212 发表于 2013-8-12 20:54

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

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

回复 oぃ夢ゞ舞風雲ヤ
9 ?8 t/ Z2 k% R0 A: n0 d" j, S$ @& r5 ^# g

' Y$ X% c. j/ t) F 现编一个，你只要左键依次点选封闭区域内部点后回车就出结果了：
8 a+ u6 t4 c/ _6 \( S6 X(defun c: ...% e- d7 i) M) V3 N
xhq1954425 发表于 2013-8-12 23:00

这个程序要怎么用？？？

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

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

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

比较快的方法是用PL线圈圈，看属性; F, P- R0 L7 A+ k1 ?
gzhaj_813 发表于 2013-8-14 16:38

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

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

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

本帖子中包含更多资源