遍历文件夹
来源:互联网 发布:淘宝紫米商学院怎么样 编辑:程序博客网 时间:2024/03/29 03:07
遍历文件夹
TSearchRec sr;
if (FindFirst(dirpath+"/*.*", faAnyFile, sr) == 0)...{
do...{
if(sr.Name!="." && sr.Name!="..")...{
if( (sr.Attr & faDirectory) == faDirectory )...{
if(DropFolderFirstFlag)...{
char buf[5000];
sprintf(buf,BuildSocket->GetStringResource( RES_MSG_ERROR_ADDSUBFOLDER ),dirpath.c_str());
if( Application->MessageBox( buf, BuildSocket->GetStringResource( RES_DLG_CAPTION_SPATH ), MB_YESNO | MB_ICONEXCLAMATION ) == ID_YES )...{
DropFolderSubFlag = true;
}
DropFolderFirstFlag = false;
}
if(DropFolderSubFlag)...{
AddDropFolder(key , dirpath+"/"+sr.Name);
}
}else...{
AnsiString param = dirpath + "/" +sr.Name;
param = param + "?" + key;
srcManager->AddDropSrcFiles(param.c_str() ,NULL,NULL);
}
}
} while (FindNext(sr) == 0);
FindClose(sr);
}
if (FindFirst(dirpath+"/*.*", faAnyFile, sr) == 0)...{
do...{
if(sr.Name!="." && sr.Name!="..")...{
if( (sr.Attr & faDirectory) == faDirectory )...{
if(DropFolderFirstFlag)...{
char buf[5000];
sprintf(buf,BuildSocket->GetStringResource( RES_MSG_ERROR_ADDSUBFOLDER ),dirpath.c_str());
if( Application->MessageBox( buf, BuildSocket->GetStringResource( RES_DLG_CAPTION_SPATH ), MB_YESNO | MB_ICONEXCLAMATION ) == ID_YES )...{
DropFolderSubFlag = true;
}
DropFolderFirstFlag = false;
}
if(DropFolderSubFlag)...{
AddDropFolder(key , dirpath+"/"+sr.Name);
}
}else...{
AnsiString param = dirpath + "/" +sr.Name;
param = param + "?" + key;
srcManager->AddDropSrcFiles(param.c_str() ,NULL,NULL);
}
}
} while (FindNext(sr) == 0);
FindClose(sr);
}
- 遍历文件夹
- 遍历文件夹
- 遍历文件夹
- 遍历文件夹
- 遍历文件夹
- 文件夹遍历
- 遍历文件夹
- 遍历文件夹
- 遍历文件夹
- 遍历文件夹
- 遍历文件夹
- 遍历文件夹
- 遍历文件夹
- 文件夹遍历
- 遍历文件夹
- 遍历文件夹
- 文件夹遍历
- 遍历文件夹
- 爱java,爱生活......
- [C#]解决读写包含汉字的txt文件时乱码的问题
- 通过S60 3rd Edition SDK 看清S60 3.0系统
- 用Ajax 1.0制作一个按钮提交后UpdatePanel动画
- VisualStudio2005技巧集合--打造自己的CodeSnippet
- 遍历文件夹
- 转一首普希金的诗,给郁闷的日子煽煽情!
- DataGrid的双向排序
- VB ExeCuteLine
- 调用约定(calling convention)(转)
- WebLogic中SQL Server2000的JDBC Pool配置
- IIS 服务器的权限检查
- 一个比较不错的JS时间控件
- 9210的Micaps第15类调色板数据