[求助]：[0318]ssname函数问题?

xyz518mm · 发表于 2006-3-19 00:09:11

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

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

×

[求助]：[0318]ssname函数问题?

各位高手您好:

请问我想ssget 选集的资料
在下面作运算,
但在 ssname 这里的 i 出错了,
不知道可请各位高手帮忙解答一下吗
谢谢

(setq pt1:ss (ssget "c" p0A (SETQ POB:1 (POLAR p0A 0 DD)) ))

(DEFUN pt:ss:xx (i pt:ss pt:10 pt:11 )
(setq pt (ssname pt:ss i) ))
(setq pt:int (inters pt:10 pt:11
(cdr (assoc 10 (entget pt:ss)))
(cdr (assoc 11 (entget pt:ss))) ))
)

我呼叫这函数的叙述不知道对吗?
(pt:ss:xx 1 pt1:ss p0A POB:1 )

xyp1964 · 发表于 2006-3-19 00:33:11

实在不知所云！乱！

xyz518mm · 发表于 2006-3-19 08:20:42

不好意思
写的真是乱阿
我想要的是一个自设函数,
想要设定 ssname 由选集中提取的物件位置
但我不知道这个 i 该怎样写入
所以想请各位高手帮忙解答一下
谢谢

ljpnb · 发表于 2006-3-19 08:23:21

(setq pt (ssname pt:ss i) )) 这句中的pt:ss代表是一个选集变量，(cdr (assoc 10 (entget pt:ss)))中的(entget pt:ss)明显是错误的。应该是(entget pt)

xyz518mm · 发表于 2006-3-19 09:42:30

感谢您的解答
问题总算解决了~

xyp1964 · 发表于 2006-3-19 12:14:19

[FONT=courier new](defun ss-num (sssel i / si)
(if (setq si (ssname sssel i))
si
)
)[/FONT]

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

[求助] [求助]：[0318]ssname函数问题?

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

相关帖子