设为首页收藏本站
开启辅助访问 切换到窄版
搜索
第一问答网»论坛 › 中问网 › 问答 › delphi 将文件夹中所有.JPG文件的文件名，保存在任意新 ...

delphi 将文件夹中所有.JPG文件的文件名，保存在任意新建的.TXT文本文件中

[复制链接]
查看11 | 回复1 | 2011-3-17 18:01:04 | 显示全部楼层 |阅读模式
系统里所有的.jpg文件么？ 我也才学D 给你个思路 如果是当前文件夹下 参考这个 获取所有文件名 之后判断pos如果后三位为jpg 那么写入txt.具体 下班到家写一下给你你参考这个，这个是遍历某目录及其所有子目录、文件，并删除的函数。有你要的东西 procedure Fun_DeleteDir(sDirectory:String);stdcall;//删除目录和目录下得所有文件和文件夹 var
sr:TSearchRec;
sPath,sFile: String; begin
if Copy(sDirectory,Length(sDirectory),1)
'
回复

使用道具 举报

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

本版积分规则

千问

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
回复楼主 返回列表
热门排行