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博士
页: 1 [2]
查看完整版本: 需要找到所有包含的DWG