自动批量加载【修复bug2022.10.10】

crystalboy · 发表于 2022-9-28 11:48:01

本帖最后由 crystalboy 于 2022-10-10 13:06 编辑

功能描述：自动加载kk-Autoload.lsp所处文件夹下的文件及其子文件夹下的文件。支持lsp、 vlx 、fas，arx，dll（netload方式加载）。

2022.09.28 第一次更新
2022.10.06 修复拖拽加载后不能添加到启动组的问题。
      （有个问题，描述如下：
   1. 拖拽加载后，只是修改了注册表的内容，重启cad后appload查看，kk-Autoload.lsp已经添加到启动组里面。
   2. 拖拽加载后，不重启cad，新打开其他cad文件，能自动加载kk-Autoload.lsp。
         若用appload查看，里面的启动组内容无kk-Autoload.lsp，且查看后注册表里
         面加载kk-Autoload.lsp的内容也消失了。不知道怎么解决。）
2022.10.10 修复不能加载dll的bug。
      dll采用(vl-cmdf "netload" x)方式加载。

crystalboy · 发表于 2022-9-29 21:48:58

rocking2008 发表于 2022-9-29 10:27
命令: (LOAD "C:/Users/rocking/Desktop/测试/kk-Autoload.lsp") ; 错误: *error* 函数中出错参数太多

s ...

安全加载，默认是开启的，为中等。程序中代码把他关了，不然没添加路径，要一个一个确认，太麻烦了。kk-Autoload.lsp我一直用了一年多了，没出现你说的这种情况。

crystalboy · 发表于 2022-9-29 21:45:23

liufii 发表于 2022-9-29 10:12
试一下，之前试过坛子里好多，都有一个问题，一次性打开多个文件的时候，总有几个文件加载不上来！

加载中若有贱人工具箱的和谐版，加载了和谐版，后面的搜索的其他文件都加载不起了，目前就只发现这个问题。和谐修改后导致的。

ljfzx · 发表于 2022-9-30 09:25:20

crystalboy 发表于 2022-9-29 21:41
(setq list_files (kk-getfiles str_name1 "*.*" 1)) 主程序中的 1 修改为0

改成0之后自动加载就失效了只有拖拽进去的那一次有用后面都不生效

lxl217114 · 发表于 2022-9-28 12:07:49

谢谢分享，dll也解决了这个就很好

行天下 · 发表于 2022-9-28 12:48:32

谢谢分享，这个就很好

magicheno · 发表于 2022-9-28 13:21:36

这个可以啊，感谢大佬分享

zijie87 · 发表于 2022-9-28 13:38:09

如果有个使用说明就好了

hhh454 · 发表于 2022-9-29 07:23:25

加载很方便了，感谢楼主分享

白色微風1991 · 发表于 2022-9-29 07:48:04

感謝樓主分享

孤鸿影飘渺 · 发表于 2022-9-29 09:15:49

感谢大佬分享

liufii · 发表于 2022-9-29 10:12:13

试一下，之前试过坛子里好多，都有一个问题，一次性打开多个文件的时候，总有几个文件加载不上来！

rocking2008 · 发表于 2022-9-29 10:27:15

命令: (LOAD "C:/Users/rocking/Desktop/测试/kk-Autoload.lsp") ; 错误: *error* 函数中出错参数太多

secureload这个是什么？

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

[源码] 自动批量加载【修复bug2022.10.10】

本帖子中包含更多资源

评分

点评