zcl_() 发表于 2023-4-25 17:17:17

求帮助，通过lisp代码，获得该lisp文件的地址

大师们，有没有办法能获得本lisp文件的路径的办法。就是通过lisp代码，获得该lisp文件的地址。之前好像在哪个帖子看到过，后来找不到了。。。。

不一样地设计 发表于 2023-4-25 18:47:41

;;;自动加载路径下的VLX FAS LSP 文件
(foreach n (vl-remove "文件名.lsp" (vl-directory-files "路径" "*.lsp"))
(if (vl-catch-all-error-p (vl-catch-all-apply 'load(list (strcat "路径" n))))
    (princ (strcat "\n" n "加载失败"))
    (princ (strcat "\n" n "加载成功"))
)
)

zcl_() 发表于 2023-4-25 19:37:10

不一样地设计 发表于 2023-4-25 18:47
;;;自动加载路径下的VLX FAS LSP 文件
(foreach n (vl-remove "文件名.lsp" (vl-directory-files "路径" " ...

如果不知道路径，有办法么？

不一样地设计 发表于 2023-4-25 21:07:39

http://bbs.mjtd.com/thread-64323-4-1.html

不一样地设计 发表于 2023-4-25 21:15:18

zcl_() 发表于 2023-4-25 19:37
如果不知道路径，有办法么？

(FINDFILE "名称.LSP")

zcl_() 发表于 2023-4-26 10:10:37

不一样地设计 发表于 2023-4-25 21:15
(FINDFILE "名称.LSP")

findfile 能找到地址的前提是，文件在cad的支持的搜索路径下。如果不在，还是解决不了。

zcl_() 发表于 2023-4-26 10:25:08

不一样地设计 发表于 2023-4-25 21:07
http://bbs.mjtd.com/thread-64323-4-1.html

看了这个帖子，感觉思路是对的，可是我win10，也没有弄出来。谢谢！

不一样地设计 发表于 2023-4-26 19:00:40

那只能查看ap命令，查询历史加载记录
页: [1]
查看完整版本: 求帮助，通过lisp代码，获得该lisp文件的地址