帮忙看看这段程序

dinosaurhxe · 发表于 2007-10-25 23:55

CAD提示无法设置系统变量“CECOLOR”）

原意为将块属性文字改为普通文字，但颜色老出问题，无奈之下只好先把颜色注释掉了。

请高手帮忙看看，怎样解决CAD提示无法设置系统变量的问题。

谢谢！

xgr · 发表于 2007-10-26 02:26

修改如下

(if (not (null col));如果图元el的颜色不为空，即不是随层颜色
(setvar "CECOLOR" (itoa col))
)

dinosaurhxe · 发表于 2007-10-26 22:23

感谢楼上指点，已经明白了。

getvar/servar的参数都必须是字符串(string)，而用cdr从图元表里获取的是数值(int)

对么？

dinosaurhxe · 发表于 2007-10-30 22:58

再问：忽然发现这个程序运行时命令行老提示

未知命令“XXX”

虽然不影响使用，但看着怪别扭的，高人有解决方案么？

xgr · 发表于 2007-10-31 00:57

查看COMMAND函数里，有多余的"",删除即可。

dinosaurhxe · 发表于 2007-10-31 21:14

感谢xgr指点！

不过还有一点不明白：我用AutoCAD2008，直接在命令行输入text命令时，需要两次回车才能确定，为什么LISP不再需要""了呢？

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