ng0077 发表于 2015-3-29 10:26:23

[求助]autolisp ssget [filter-list] 详细使用方法

[求助]autolisp ssget 详细使用方法

函数:
(ssget ] )

用 ssget 函数 按属性提取 图元,
如:
(SETQ TKMC (SSGET '((2 . "A$C5D086817"))))


但是'((2 . "A$C5D086817"))))   如何使用函数代替??

如:
(defun c:ssid()
(setq tkmc(assoc 2 (entget(car(entsel))))
        sstkmc(ssget tkmc)
)
)

先用鼠标选取一个图块 读取图块参数, 取得 图块名称 “2 . "A$C5D086817"”,然后用 ssget 选取所有

同样名称的图块,

但是在使用 sstkmc(ssget tkmc) 的时候提示 “错误: 错误的点参数”,
    改成 sstkmc(ssget (tkmc)) 的时候提示 “错误: 函数错误: (2 . "A$C5D086817")”

如何能做到?

Andyhon 发表于 2015-3-29 12:38:11

(SETQ ssTKMC (SSGET (list tkmc)))

ng0077 发表于 2015-3-29 20:00:10

就这么简单??我试试

ng0077 发表于 2015-3-29 20:27:07

完美,太完美了,感谢 Andyhon   大人
页: [1]
查看完整版本: [求助]autolisp ssget [filter-list] 详细使用方法