有无办法一次性加载所有Lsp文件

zfsaaa · 发表于 2009-6-23 18:47:00

有无办法一次性加载所有Lsp文件

ZZXXQQ · 发表于 2009-6-23 22:24:00

有。

zfsaaa · 发表于 2009-6-24 09:47:00

请告诉我方法

sailorcwx · 发表于 2009-6-24 20:36:00

加载指定目录下的所有lisp文件

(mapcar 'load (vl-directory-files strPath "*.lsp" 1))

strPath为lisp文件所在目录

zfsaaa · 发表于 2009-6-25 11:49:00

sailorcwx发表于2009-6-24 20:36:00加载指定目录下的所有lisp文件(mapcar 'load (vl-directory-files strPath \"*.lsp\" 1))strPath为lisp文件所在目录

先谢谢你！我很苯，能不能具体地说，是先生成一个文件,还是把(mapcar 'load (vl-directory-files strPath "*.lsp" 1))加到那里,另外strPath是个文件夹还是文件.

paojie · 发表于 2009-7-21 09:51:00

果然是高手

受教了

以马内利 · 发表于 2009-7-22 13:52:00

strPath 是路径啊!

357785513 · 发表于 2009-7-24 12:45:00

这样写有很多缺陷

账号		自动登录	找回密码
密码			注册