文件列表生成器

tangjl12345

客户发了很多张PDF格式图纸，报价沿用客户文件名称，为了免除一个个手工输入或复制粘贴的麻烦，特意开发了这个文件列表生成器，它能将指定文件夹下的文件名称提取并保存为电子表格文件。

程序界面



保存的表格文件



通过网盘分享的文件：文件列表生成器.exe
链接: https://pan.baidu.com/s/13LPNHojuc0iESLeRtoKdrQ?pwd=96jq 提取码: 96jq

dj0733

tsyhome 发表于 2025-2-22 18:57
常用批处理解决这个问题！

对啊  dir/b >a.txt

zhufuan

老师，这个最好有打开文件的超链接，这样更方便打开

tangjl12345

around999 发表于 2025-2-22 16:59
我一直用的方法是把文件夹地址粘贴到浏览器，再把内容复制粘贴到表格

那样比较麻烦，这个一步到位！

around999

我一直用的方法是把文件夹地址粘贴到浏览器，再把内容复制粘贴到表格

冥界3大法王

这用 Delphi几行代码就解决了。。。

uses
   IOUtils, Types;

procedure TForm31.Button1Click(Sender: TObject);
var
  dir: TDirectory;
  files: TStringDynArray;
  str: string;
begin
  files := dir.GetFileSystemEntries('X:\ShellBrowser Components Delphi Edition\Samples');
  for str in files do
    showmessage(str);
end;

jokony

这个可以，，，感谢分享。。

sktao

方便是方便啊 我就是把文件剪切到目录文件的  不知道是不是这个道理

around999

tangjl12345 发表于 2025-2-22 17:05
那样比较麻烦，这个一步到位！

办法虽土，但任意电脑随时可用，当然固定电脑时这个确实是不错的选择

tsyhome

常用批处理解决这个问题！

yqesl1

最后一个反斜杠\强迫症表示受不了，为什么不是像前面那样都是正斜杠/