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

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

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

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

x

(defun c:recaa() 5 i/ J( m8 D6 J m* [' J. I6 A
(setq acreage (command "area" "A" "O" )( B- j' |; Y9 `# l1 |7 I
); R1 A3 H0 m* L$ A5 ]/ [7 t
(princ (strcat "面积总和=")(princ acreage)
9 n6 `: ~7 s3 `+ i8 k9 F
)

复制代码

麻烦各位大侠指点下

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" )
8 l0 D1 u+ L8 w第3行是捕手等待输入啦2 _, O t- v$ [) t$ K9 |- T
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 得有二进位基础直接上网搜呗 , 多着哩!

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

通知

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

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

评分

评分

浏览过的版块