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

点2逗号

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

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

 
谢谢
 
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

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

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

 
PmxCAD

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

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

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

像这样的

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

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

Your Code Here=
Your Code Here
页: [1]
查看完整版本: 点2逗号