需要找到所有包含的DWG

alanjt · 发表于 2022-7-6 12:23:38

在学习为其编程之前，有更多的理由学习该程序。

Lee Mac · 发表于 2022-7-6 12:29:51

我知道你不需要再这样做了，只需要澄清一下。

我已经把你需要的所有代码都发布在我的帖子里了。LISP的文件名无关紧要——如果您愿意，甚至可以在一个文件中同时包含这两个函数。

DrWho · 发表于 2022-7-6 12:36:07

我只是理解有点慢。

为了其他lisp学习者的利益，李试图告诉我做的是参加考试。lsp文本，并将其直接插入Mac ODBX代码中以代替原始代码“（defun c：测试…”部分然后可以用任何名称保存MAC-ODBX代码（如“MAC-ODBX.lsp”）。加载MAC-ODBX后。lsp，您只需在命令行键入TEST。

它运行得非常快，输出是一种列表形式，如果需要，可以进一步处理。

我发现它正在搜索精确的文本匹配。对于包含性文本匹配，我将“（if（eq searchterm（vla get TextString att））”替换为“（if（wcmatch（vla get TextString att）（strcat“*”searchterm“*”）”，这是基于http://www.cadtutor.net/forum/showthread.php?t=19333.无论哪种方式都很好。

李，再次感谢你的帮助。我喜欢它！这是一个很好的练习，为以后的Lisp程序打下了良好的基础。非常感谢！

Lee Mac · 发表于 2022-7-6 12:40:56

很高兴我能以某种方式帮助WHO博士

[编程交流] 需要找到所有包含的DWG

发表回复

精选推荐