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

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

用程序！$ f+ i/ V; u! G: b/ C) @0 d8 i4 S1 M; K
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

前提是要是一个闭合的图形
6 i1 f; V' Q( f! w) K4 ^1 Nzhjl1212 发表于 2013-8-12 20:54

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

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

回复 oぃ夢ゞ舞風雲ヤ . e R7 x& m/ A9 h" M3 _* Z
4 ]+ v" r% p6 a$ V8 ^
0 X$ S3 e7 _ ? F% l# _+ n
现编一个，你只要左键依次点选封闭区域内部点后回车就出结果了：
2 C- \8 }2 V" ]9 X(defun c: ...
1 j. T) a7 `8 ~, n( U4 r8 ]xhq1954425 发表于 2013-8-12 23:00

这个程序要怎么用？？？

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

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

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

比较快的方法是用PL线圈圈，看属性8 ]- L' G$ O; s+ s1 `
gzhaj_813 发表于 2013-8-14 16:38

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

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

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

本帖子中包含更多资源