修改多行文字行距

ATS1211 · 发表于 2022-7-6 08:23:22

大家好，

我对lisp编程相当陌生，正在尝试编写一个lisp例程，将图形中所有多行文字的线空间样式从“至少”更改为“完全”。我将把这个步骤合并到一个现有的lisp例程中，该例程可以做其他一些事情。

到目前为止，我已经搜索并没有找到控制这个变量的DXF代码。我确实发现一个lisp使用了：

“vla put TextLineSpacingStyle”和“aclinespacingstyle”

然而，我得到的只是一个错误，即“ActiveX服务器返回了错误：未知名称：TextLineSpacingStyle”

非常感谢您的帮助！

谢谢

MSasu · 发表于 2022-7-6 10:17:28

也许这会帮助你：

copy

(entmod (subst (cons 1 (strcat "\\pxse1;" (cdr (assoc 1 MyMTextEntity))))
              (assoc 1 MyMTextEntity)
              MyMTextEntity))

当做
米尔恰

[编程交流] 修改多行文字行距

发表回复

精选推荐