【已解决】(vl-catch-all-apply ' car ent)) 错误

skyline00227 · 发表于 2018-11-19 16:28:51

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

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

×

本帖最后由 newer 于 2018-11-20 09:11 编辑

请问下：命令：(setq ent （entsel))
返回：(<图元名: 3ec4d448> (210.757 -129.298 0))
命令：(setq tt (vl-catch-all-apply ' car ent)) ；有问题？

返回：#<%catch-all-apply-error%>
命令：(vl-catch-all-error-message a)

返回："参数太多"

(setq tt (vl-catch-all-apply ' car ent)) 这条语法哪里错了？
查了帮助和其他例子(setq d2 (VL-CATCH-ALL-APPLY 'sqrt(list(- (* dd dd) (* d1 d1))))) 也是这么用的。
求大神指点。

newer · 发表于 2018-11-19 16:51:44

本帖最后由 newer 于 2018-11-19 16:53 编辑

vl-catch-apply 就相当于apply
你试试

选择对象: (<图元名: 7ff4363058d0> (1924.46 843.327 0.0))
命令: (apply 'car e)
错误: 参数太多

(apply 'car e) 相当于 (car <图元名: 7ff4363058d0> (1924.46 843.327 0.0))

知道问题在哪了吗？

你要 (apply 'car (list e)) 才行

对应你的，你要
(vl-catch-all-apply 'car (list ent))
你举得两个例子，下面那个比上面的多个 list 啊

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

[已解决] 【已解决】(vl-catch-all-apply ' car ent)) 错误

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