【API】多文件选择函数，支持所有CAD版本的多选

tryhi

感谢baitang36 大神的 [试验]用纯lisp打造一个多选文件对话框（仅实现32位，64位cad不能用）
一开始因其不支持64位而放弃，原因是lsp无法使用64位指针，后来发现结构体并不需要指针修改，可以直接创建，从而适配了64位，所以在其基础上增加64位CAD支持，更改对话框样式，增加多个参数
本fas单独加载时有回显，打包后就没有回显，不影响打包使用，无限制

;;[可选]参数1：标题（默认为打开）
;;[可选]参数2：起始目录（默认为上一次目录）
;;[可选]参数3：缺省文件名（默认为空）
;;[可选]参数4：过滤器（文件扩展名），默认为*.*
;;返回所选择的文件列表
;;示例：4个参数均为可选，也可使用nil
(try-getfiles);无参数调用
(try-getfiles "标题" "d:\\")
(try-getfiles nil nil nil "*.lsp;*.fas")
(try-getfiles "标题" "c:\\" "c:\\1.txt" "*.lsp;*.fas;*.vlx;*.txt")

(?try-getfiles);打开函数说明

自贡黄明儒

好贴呀，可惜bricscad不支持fas,现在我们用这个了。

664571221

自贡黄明儒 发表于 2024-8-4 15:26
好贴呀，可惜bricscad不支持fas,现在我们用这个了。

黄大师 大朋有个内部函数群，你问问大朋，他研究的很透彻了

tryhi

ssyfeng 发表于 2024-11-1 10:11
在windows 10操作系统，auto CAD2022 64位上运行全部返回nil
不知道什么原因

把lispsys改成0重启

1028695446

抢个沙发坐坐

crtrccrt

牛，就一个字

jun353835273

这个功能比较实用

tigcat

厉害，海哥这个程序很实用。

jenlin

大佬半夜了还在研究！

MZ_li

大海出品

kozmosovia

似乎有点问题的

zyxi19

感谢分享                        

ketxu

Thanks for sharing <3
令人惊奇的是，您可以使用纯 Lisp 来构建具有非列表的可选参数的函数。
你能分享一个小秘密吗？