[求助]：这个程序有何问题？vlax-put-property相关

haibinpro · 发表于 2006-9-28 22:31:23

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

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

×

(defun c:ff()
(setq ss (ssget))
(vlax-put-property ss 'Color 1)
)

执行提示：
命令: ff
选择对象: 找到 1 个

选择对象:
; 错误: 参数类型错误: VLA-OBJECT <Selection set: ea>

HuaiYu · 发表于 2006-9-28 22:51:45

vlax-put-property 是对于对象进行属性赋值的吧，
你这个 ss 应该是选择集，应该遍历这个选择集
来对这里的对象进行属性赋值

haibinpro · 发表于 2006-9-28 23:41:03

修改为
(defun c:ff()
(setq ss (entsel))
(vlax-put-property ss 'Color 1)
)
还是不行。

设置 ActiveX 对象的特性
(vlax-put-property obj property arg)

该函数原为 vlax-put。

参数

obj

VLA 对象。

property

符号或字符串，指定要设置的特性。

arg

要设置的值。

返回值

如果成功则返回 Nil。

样例

将对象着色为红色：

$ (vlax-put-property vlaobj 'Color 1)

nil

雨箭风刀 · 发表于 2006-9-29 08:04:03

obj

VLA 对象

ss 是选集，不是 vla 对象

Underway · 发表于 2006-9-29 09:10:40

check here
http://www.afralisp.net/vl/pm1.htm

greecelzy · 发表于 2006-9-29 21:13:36

目的是使不能编辑或编辑非常麻烦

haibinpro · 发表于 2006-9-30 01:07:29

有些晕，我看看明天能不能尝试者试出来，不行的话还得麻烦各位指导下。

lijiao · 发表于 2006-9-30 12:06:58

修改为
(defun c:ff()
(setq ss (car (entsel)))
(setq ss (vlax-ename->vla-object ss))
(vlax-put-property ss 'Color 1)
)
一般说来，还需要判别一下是否选择到了实体，该实体是否具有color属性，该属性是否能够被修改等

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

[求助] [求助]：这个程序有何问题？vlax-put-property相关

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子