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

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

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

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

x

(defun c:recaa() ; r, U; H8 o0 g& r0 u5 i6 F
(setq acreage (command "area" "A" "O" )) q; ^2 e; O, Q- e- r
)
: y. o4 Z+ R$ p! v7 u5 C9 O
(princ (strcat "面积总和=")(princ acreage): Y% T. _! p5 q
)

复制代码

麻烦各位大侠指点下

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 l9 P* u! f( Y; g* i第3行是捕手等待输入啦2 B5 C; F" `) C
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 得有二进位基础直接上网搜呗 , 多着哩!

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

全站		goto3d 说: 此次SW竞赛获奖名单公布如下，抱歉晚了，版主最近太忙：一等奖：塔山817；二等奖：a9041、飞鱼；三等奖：wx_dfA5IKla、xwj960414、bzlgl、hklecon；请以上各位和版主联系，领取奖金！！！	2022-03-11
全站		goto3d 说: 在线网校新上线表哥同事（Mastercam2022）+虞为民版大（inventor2022）的最新课程，来围观吧！	2021-06-26

通知

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

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

评分

评分