mcxiangxin · 发表于 2008-5-29 22:10:00

请教一下:怎么样判断,当前目录下是否存在名称为"图块"的子目录?

alin · 发表于 2008-5-30 07:36:00

(member "图快" (vl-directory-files (getvar "DWGPREFIX")
nil -1)

mcxiangxin · 发表于 2008-5-30 19:19:00

感谢!还有个问题:为什么用(vl-directory-files (getvar "DWGPREFIX")
nil -1)得到一个文件夹的表,基中有 "." ".." 两项,它们不是文件夹吧?它们为什么会存在呢?

alin · 发表于 2008-5-30 20:59:00

这俩个东东是从前MS-DOS的目录结构遗留下来的，与其说他们是目录（文件夹），还不如说他们是目录指针，一个点指向当前目录，两个点指向上一层目录(parent directory),你不能也不可能删除他们。

mcxiangxin · 发表于 2008-5-30 21:29:00

哦，那就不删除了

尘缘一生 · 发表于 2019-9-10 08:34:22

以上回答均没有解决问题，楼主是要：判断有没有子目录，有和没有2个答案的代码！

尘缘一生 · 发表于 2019-9-11 19:34:55

从来不设计人，研究就是问题，不要参与其他，这个子目录的问题，我是这么作的：

(= nil (nth 2 (vl-directory-files "D:\\图库" "*.*" -1))) ;;;;判断图库下存在子目录否

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

怎样判断当前目录下是否还有子目录