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

janekou

1. (defun c:recaa()
   7 ?5 o0 T/ r( J+ l
2. (setq acreage (command "area"  "A"  "O" )
   6 g" a; Z* j2 m8 d: z
3. )
   
4. (princ (strcat "面积总和=")(princ acreage)
   
5. )

复制代码

4 r- |. N5 ~( m, E- Z0 H7 Y3 L麻烦各位大侠指点下

SunVei

(defun c:recaa()
7 p, L8 Y0 c  P  (command "area"  "A"  "O" )
6 C" O' [% e! ^" z3 i/ T  (while (= (logand (getvar "CmdActive") 1) 1) (command pause))
+ n: D! P, h3 N2 v( ~5 L7 T  
  (princ "面积总和= ")(princ (GetVar "Area"))
4 p* q3 Y2 J  d)

janekou

2# SunVei
& \1 M  R! B4 w( ~
5 G1 a& H6 ]$ ?& e) I9 a您好，我是想用recaa选对象后能显示个总面积，不再显示选择框，请问下有办法么？还有的是请问第三行的意思是？

SunVei

... 选对象后 ...
4 ^: m8 U) r, I6 U% W9 x与现有的差异在那?
1 |# t' P) @3 t# N. d: t请用实例解说

janekou

4# SunVei
, b: f3 c. p5 ]6 P0 R抱歉，把原来的代码复制进去了，那请问下第3行的意思是？

SunVei

: n! M2 g% f: O" ^0 r! F8 v) k
(command "area"  "A"  "O" )
不是未完待续吗?
6 J- u. B0 A5 Y8 I第3行是捕手等待输入啦
) o% U% ]+ F& s; t4 K代码自己要能掌握确切才能更上层楼

janekou

(command "area"  "A"  "O" )
6 p% J3 E) {* s( B. }- M% q/ x* M9 V' K第3行是捕手等待输入啦
% R# y, P( ^" u, d- vSunVei 发表于 2011-11-6 20:34 http://www.3dportal.cn/discuz/images/common/back.gif

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

SunVei

"CmdActive"
F1 --> System Variables
4 n& [, o9 X1 L% U" Q6 xlogand 得有二进位基础 直接上网搜呗 , 多着哩!