HARLEYDONG 发表于 2008-12-2 00:46:00

急求关于LISP代码加载多个LSP文件方法

<p>小弟现要用如下文件：</p><p>(load "D:***.lsp")<br/>(load "D:***.lsp")<br/>(load "D:***.lsp")</p><p>&nbsp;</p><p>要加载多个当前文件夹的多个LSP文件，但是不能写入盘符路径，直接引用（就是当前文件夹内的文件），</p><p>以前好像有见过，但是现在用起来怎么也不成功，</p><p>望高手指点，小弟坐等！！！</p>

yshf 发表于 2008-12-2 08:05:00

<p>(load "D:\\***.lsp")<br/>(load "D:\\***.lsp")<br/>(load "D:\\***.lsp")</p>

HARLEYDONG 发表于 2008-12-2 08:50:00

<p>谢谢楼上的大虾，可能是我没有说清楚，我想问的是</p><p>(load " :\\***.lsp")<br/>(load " :\\***.lsp")<br/>(load " :\\***.lsp")</p><p>不用盘符的方法，引用当前文件夹内的LSP文件，望高手们来帮小弟看看，给点意见</p><p>&nbsp;谢谢!!!</p>

Andyhon 发表于 2008-12-2 09:24:00

<p>Try</p><p>(foreach fileOK '("MyLispA" "MyLispB" "MyLispC" "....")<br/>&nbsp;&nbsp; (if (findfile (StrCat FileOK ".Lsp")) (load FileOK))<br/>)</p>

HARLEYDONG 发表于 2008-12-2 10:09:00

<p>楼上的兄弟，可以小弟水平较低，刚调试了，不能成功，烦请大虾指点...</p><p>小弟需要加载的三个LSP文件名称为:</p><p>quickdraw.lsp</p><p>onn.lsp</p><p>filelist.lsp</p><p>&nbsp;</p>

nonsmall 发表于 2008-12-2 10:19:00

<p>选项中添加一个文件支持搜索路径</p><p>然后用(findfile)</p>

HARLEYDONG 发表于 2008-12-2 10:24:00

<p>谢谢各位大虾，小弟现在明白了，谢谢！！！</p>

leimw 发表于 2018-12-17 19:14:04

请问你是如何做的？请教下

664571221 发表于 2023-5-1 16:11:37

HARLEYDONG 发表于 2008-12-2 10:24
谢谢各位大虾，小弟现在明白了，谢谢！！！

你明白了能不能分享一下代码呢
页: [1]
查看完整版本: 急求关于LISP代码加载多个LSP文件方法