小kiss啦，各位大虾帮帮小忙吧（怎样得到文件夹下的所有文件名和类型？）

[duststar]

小弟想做点小东西，需要知道当前文件夹下的所有文件名和类型，以及所包含的子文件夹内的文件名和类型。怎样才能做到呢？一定给分啦！！

[kingofwang]

用FindFirstFile/FindNextFile之类的函数。
I just have write a code ,which find files in the EXE file directory,and add the file into a combobox if the file is a directory.

AnsiString path;
path=ExtractFilePath(ParamStr(0))+"*";
HANDLE findfile;
WIN32_FIND_DATA fdfindfile;
findfile=FindFirstFile(path.c_str(),&fdfindfile);
if(findfile!=INVALID_HANDLE_VALUE)
{
if(fdfindfile.dwFileAttributes==FILE_ATTRIBUTE_DIRECTORY
&&AnsiString(fdfindfile.cFileName)!="."&&AnsiString(fdfindfile.cFileName)!="..")
{
cbDatabase->Items->Add(fdfindfile.cFileName);
}
while(FindNextFile(findfile,&fdfindfile))
{
if(fdfindfile.dwFileAttributes==FILE_ATTRIBUTE_DIRECTORY
&&AnsiString(fdfindfile.cFileName)!="."&&AnsiString(fdfindfile.cFileName)!="..")
{
cbDatabase->Items->Add(fdfindfile.cFileName);
}
}
FindClose(findfile);
}

[In355Hz]

用FindFirstFile/FindNextFile就可以。不过要写一个函数递归访问子目录。比如：
BOOL DirWalkProc(LPCTSTR lpszPath) //仅供参考
{
TCHAR lpszCurPath[MAX_PATH];
GetCurrentDirectory(MAX_PATH, lpszCurPath); //保存旧的当前目录路径
SetCurrentDirsctory(lpszPath); //把查找的目录路径设置为当前路径

HANDLE hFind = INVALID_HANDLE_VALUE;
WIN32_FIND_DATA FindData;
if((hFind = FindFirstFile(TEXT("*.*"), &FindData)) = INVALID_HANDLE_VALUE) //得到一个搜索句柄，并找到第一个文件/目录
return FALSE;
do {
if( (FindData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) &&
(FindData.cFileName[0] != TEXT('.')) ) { //是否是子目录
TCHAR lpszDir[MAX_PATH];
_stprintf(lpszDir, "%s%s\\", lpszPath, FindData.cFileName); //把路径和目录名合成为目录全路径,如果传入的lpszPath最后一个符号不是'\',这一句应为_stprintf(lpszDir, "%s\\%s", lpszPath, FindData.cFileName);
DirWalkProc(lpszDir); //递归调用
}
else {
/*找到文件，可以进行你的处理，比如：
TCHAR lpszFile[MAX_PATH];
_stprintf(lpszFile, "%s%s", lpszPath, FindData.cFileName);
ListBox_AddString(hwndListBox, lpszFile);
*/
}
} while(FindNextFile(hFind, &FindData)); //查找下一个文件/目录

FindClose(hFind); //关闭搜索句柄
SetCurrentDirectory(lpszCurPath); //回复原有的当前目录。
return TRUE;
}

[duststar]

thank you everyone let me have a try ,later I will give scores ,I am sure!
If anyone have some new idears ,I am gald to see also have scores.