第一次真正尝试VL。。。（一）

Lee Mac · 发表于 2022-7-6 16:02:22

我明白了，谢谢阿斯米。

Lee Mac · 发表于 2022-7-6 16:09:40

我还有一个关于VL的问题：

如果我想更改VL实体列表的属性，我会使用“foreach”还是“mapcar”？

即

将列表中的每个实体更改为红色：


(foreach ent entlst
    (vla-put-color ent "1"))

或


(mapcar 'vla-put-color entlst '("1"))

你推荐什么？

ASMI · 发表于 2022-7-6 16:13:26

(foreach ent entlst
    (vla-put-color ent [color="Blue"]1[/color])
 ); end foreach

或

(mapcar [color="#0000ff"]'(lambda(x)(vla-put-color x 1))[/color]entlst)

虽然没有太大的区别，但有人认为MAPCAR的功能更快（是不是我不知道）。Main是正确的语法。请注意，Color属性的参数是整数（不是字符串），函数MAPCAR只支持一个函数。对于这种情况，您应该使用LAMBDA。

Lee Mac · 发表于 2022-7-6 16:15:56

为抬头的ASMI干杯-

我正在尝试越来越多地使用VL，使用它会让事情变得更容易。

我想我可能需要使用lambda函数-mapcar和lambda似乎经常配对。

再次感谢

李

[编程交流] 第一次真正尝试VL。。。（一）