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

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

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

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

x

(defun c:recaa()
5 n5 s) Y+ s# b9 Y2 n$ [; p& z
(setq acreage (command "area" "A" "O" ), K+ k* l" z' ^" }9 r4 _# H# L
)0 W# b# O- P, J; S$ r2 t) C; ~
(princ (strcat "面积总和=")(princ acreage)8 E' v i/ { F8 E [
)

复制代码

麻烦各位大侠指点下

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" )" A- }9 y/ z+ _- F
第3行是捕手等待输入啦% {& A: o5 I$ n! q
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 得有二进位基础直接上网搜呗 , 多着哩!

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

通知

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

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

评分

评分

浏览过的版块