点2逗号

pmxcad · 发表于 2022-7-5 17:07:40

你好

我有一个制作命名视图的脚本。视图名称取自布局选项卡（ctab）和一些文本（本例中为LB03）。
布局名称例如为“B0UHA 48.00m”。
唯一的问题是Autocad没有在布局名称中使用逗号。
有没有办法在我的剧本中改变这一点。
因此，命名视图应为“LB03 48,00m）

[/code]
（SETQ VW（STRCAT“LB03”（GETVAR“CTAB”））
查看
W
!大众汽车
[code]

谢谢

PmxCAD

Tharwat · 发表于 2022-7-5 17:16:08

最简单的方法


(vl-string-translate "." "," "B0UHA 48.00m")

pmxcad · 发表于 2022-7-5 17:21:11

好的，谢谢，但是。。。。。。。。。。。。我想我大概有100多幅画。一些图纸包含大约30个布局。
有没有可能改变它，所以我可以使用它也为其他布局。

PmxCAD

Tharwat · 发表于 2022-7-5 17:27:54

是的，当然可以，您可以将其作为子函数，并用字符串（在您的示例中是布局名称）提供给它

例如


(defun _point_to_comma (str)
 (vl-string-translate "." "," str)
)

示例如何调用上述函数。


(_point_to_comma "B0UHA 48.00m")

应该返回。

"B0UHA 48,00m"

或者按照你上面的例子。


(setq vw (strcat  "LB03 " (_point_to_comma (getvar "CTAB"))))

如果这不适合你的需要，请告诉我。

pmxcad · 发表于 2022-7-5 17:36:06

我可以把这个放在我的剧本里吗？必须用GETVAR“CTAB”替换（str）吗？
或者可以使用lisp更改图形中已创建的命名视图，指向逗号？

PmxCAD

Tharwat · 发表于 2022-7-5 17:41:04

是的，我在你发布之前修改了我的回复，但似乎你没有更新页面以查看更改。

pmxcad · 发表于 2022-7-5 17:52:18

几乎我猜，命名视图是什么“大众”

[/code]
（setq VW（strcat“LB03”（_point\u to_comma（getvar“CTAB”）））
查看
W
!大众汽车
[code]

PmxCAD

pmxcad · 发表于 2022-7-5 17:59:12

找到了。命名视图不能包含逗号。

sathalex · 发表于 2022-7-5 18:02:25

像这样的

SLW210 · 发表于 2022-7-5 18:11:55

请阅读代码发布指南，并编辑您的帖子，将代码包含在代码标签而不是报价标签中。

[NOPARSE]

Your Code Here

[/NOPARSE]=

Your Code Here

[编程交流] 点2逗号