想显示个总面积，请问下应该怎样改呢？

janekou · 发表于 2011-11-6 10:52:43

马上注册，结识高手，享用更多资源，轻松玩转三维网社区。

您需要登录才可以下载或查看，没有帐号？注册

x

(defun c:recaa() " k3 r* b. s }% @" ^! w f
(setq acreage (command "area" "A" "O" )
4 g! z9 C5 M# J/ b$ r/ ?2 f
)
- y4 u0 f) \* H: N2 O3 i& w
(princ (strcat "面积总和=")(princ acreage)! n" }8 a8 G3 B# `: y0 ^
)

复制代码

麻烦各位大侠指点下

SunVei · 发表于 2011-11-6 15:33:59

(defun c:recaa()
  (command "area"  "A"  "O" )
  (while (= (logand (getvar "CmdActive") 1) 1) (command pause))

  (princ "面积总和= ")(princ (GetVar "Area"))
)

janekou · 发表于 2011-11-6 15:45:12

2# SunVei

您好，我是想用recaa选对象后能显示个总面积，不再显示选择框，请问下有办法么？还有的是请问第三行的意思是？

SunVei · 发表于 2011-11-6 17:49:04

... 选对象后 ...
与现有的差异在那?
请用实例解说

janekou · 发表于 2011-11-6 19:50:29

4# SunVei
抱歉，把原来的代码复制进去了，那请问下第3行的意思是？

SunVei · 发表于 2011-11-6 20:34:13

本帖最后由 SunVei 于 2011-11-6 20:35 编辑

(command "area" "A" "O" )
不是未完待续吗?
第3行是捕手等待输入啦
代码自己要能掌握确切才能更上层楼

janekou · 发表于 2011-11-8 21:35:24

(command "area" "A" "O" )0 z+ a! |! B- y8 o" O; [
第3行是捕手等待输入啦, k5 y( n; i& O/ k/ I4 j Y
SunVei 发表于 2011-11-6 20:34 http://www.3dportal.cn/discuz/images/common/back.gif

logand和 "CmdActive"的用法可以解释下吗？谢谢啦

SunVei · 发表于 2011-11-8 22:21:57

"CmdActive"
F1 --> System Variables
logand 得有二进位基础直接上网搜呗 , 多着哩!

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

通知

[已答复] 想显示个总面积，请问下应该怎样改呢？

马上注册，结识高手，享用更多资源，轻松玩转三维网社区。

评分

评分