zdqwy19 发表于 2011-11-24 14:59:16

wzh 发表于 2007-11-22 14:47 static/image/common/back.gif
;;;获取当前LSP程序加载的路径(defun GetLspPath()  (setq lsppath     (vl-regi ...

在win7不好用，错误: 参数类型错误: stringp (3)

teykmcqh 发表于 2012-2-10 01:19:46

正在查找这方面的内容，试试看一下啦

温柔/mg一剑 发表于 2012-2-12 21:51:24

高手 学习了，谢谢！

LLXXZZ 发表于 2012-2-14 12:53:43

zdqwy19 发表于 2011-11-24 14:59 static/image/common/back.gif
在win7不好用，错误: 参数类型错误: stringp (3)

win7的注册表，貌似是不同了。。。。
我也没有测试成功。

h008 发表于 2012-3-22 11:35:14

这个问题 论坛里的 yunlong300 肯定会！！！

他的程序就解决了！

不知道这高人是怎么做到的

jyzas 发表于 2013-8-12 07:34:24

FILENAME有bug,如果不同目录者有该文件，要取哪个路径？？

zmzk 发表于 2020-2-23 15:11:19

请问 wzh朋友的程序怎么用？唤起命令是什么啊？;;;获取当前LSP程序加载的路径
(defun GetLspPath()
(setq lsppath
   (vl-registry-read
"HKEY_CURRENT_USER\\Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\ComDlg32\\OpenSaveMRU\\lsp"
(substr
   (vl-registry-read
   "HKEY_CURRENT_USER\\Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\ComDlg32\\OpenSaveMRU\\lsp"
   "MRUList"
   )
   1
   1
)
   )
)
(setenv "ACAD" (strcat (getenv "ACAD") ";" (vl-filename-directory lsppath)))
)

cable2004 发表于 2020-2-23 17:42:06

（GetLspPath）
页: 1 2 3 [4]
查看完整版本: [求助]如何获得我的lisp程序的路径？