乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 ☆ ☆ ☆ 尊重版权，从我做起，拒绝盗版，拒绝倒卖 ☆ ☆ ☆ 签到、发布资源、邀请好友注册，可以获得银币 ☆ ☆ ☆ 请注意保管好自己的密码，避免账户资金被盗
楼主: CadFrank

[编程交流] 计算文件数量i

[复制链接]
Tharwat

63

主题

6297

帖子

6283

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
358
发表于 2022-7-5 23:09:45 | 显示全部楼层
 
我想所有的文件，因为它是明确的从标题的线程
回复

使用道具 举报

BlackBox

44

主题

3166

帖子

2803

银币

中流砥柱

Rank: 25

铜币
557
发表于 2022-7-5 23:12:17 | 显示全部楼层
 
不过，我当然很感激。。。。
 
 
... ^^ 为了避免这种情况，本应在此处包含此^^：
 
 
 
 
 
 
 
干杯
回复

使用道具 举报

Tharwat

63

主题

6297

帖子

6283

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
358
发表于 2022-7-5 23:15:11 | 显示全部楼层
 
因此，请通过阅读有关函数vl目录文件的内容来帮自己一个忙
回复

使用道具 举报

CadFrank

56

主题

259

帖子

213

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
270
发表于 2022-7-5 23:19:43 | 显示全部楼层
我本来打算去的！
 
我还不是大师
 
谢谢你的帮助！
回复

使用道具 举报

Tharwat

63

主题

6297

帖子

6283

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
358
发表于 2022-7-5 23:21:40 | 显示全部楼层
 
没问题，只要问问你是否坚持了什么
回复

使用道具 举报

CadFrank

56

主题

259

帖子

213

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
270
发表于 2022-7-5 23:23:52 | 显示全部楼层
我刚刚读了Vl目录文件。现在我感觉很糟糕，它实际上说出了我想要的，哈哈！
 
他应该多挖点他会在我的书中找到答案的
回复

使用道具 举报

Lee Mac

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-5 23:28:59 | 显示全部楼层
 
FWIW，由于（长度nil）=0，因此不需要if语句
 
  1. (length (vl-directory-files (getvar 'dwgprefix) "*.dwg" 1))
回复

使用道具 举报

Tharwat

63

主题

6297

帖子

6283

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
358
发表于 2022-7-5 23:32:21 | 显示全部楼层
 
我总是担心在输入或处理到结论之前的第一个语句，很高兴知道如果参数等于零，长度函数将安全退出。
 
谢谢。
回复

使用道具 举报

CadFrank

56

主题

259

帖子

213

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
270
发表于 2022-7-5 23:34:16 | 显示全部楼层
好啊嗯，我已经在这个问题上多做了几个小时了，但我想不出来！
 
现在，如果我想确保在文件中只计算具有特定字符串的文件。
 
例如：
 
  1. (setq
  2.         f (vl-directory-files
  3.             (getvar 'dwgprefix)
  4.             "*.dwg"
  5.             1
  6.           )
  7.       )

 
  1. ("1456546756.dwg" "2014-08-11 - LU-14094 - Plan de coffrage des culées - rev.00.dwg" "2014-08-11 - LU-14094-02 - Plan de coffrage des culées - rev.00.dwg")

 
现在使用：
 
  1. (setq l (vl-remove-if '(lambda (ex) (wcmatch ex "*LU-14094*")) f))

 
  1. ("1456546756.dwg")

 
现在我试了很多次，但似乎不知道如何提取另一个。
 
任何人都可以帮助plz！
回复

使用道具 举报

hanhphuc

5

主题

956

帖子

963

银币

初来乍到

Rank: 1

铜币
35
发表于 2022-7-5 23:37:35 | 显示全部楼层
大概
  1. (setq l (vl-remove-if[color="red"]-not[/color] '(lambda (ex) (wcmatch ex "*LU-14094*")) f))
回复

使用道具 举报

12
返回列表 发帖

发表回复

高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

精选推荐

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-11 09:22 , Processed in 1.244499 second(s), 70 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表