获得某文件下的所有文件夹及文件名字与扩展名,该怎么解决

获得某文件下的所有文件夹及文件名字与扩展名
例如：D：11/22 33 44 55 0.txt 等等文件
我想当我选择D盘下11文件时，并把11文件夹下的所以文件现显在一个List中，用树表示出所有子目录。

------解决方案--------------------
//编历文件夹下的所有文件(不含子目录)
int GetDirFileList(AnsiString ddir,TStringList *slt)
{
WIN32_FIND_DATA filedata;
HANDLE fHandle;
if (!DirectoryExists(ddir))
{
return 0;
}
int i=0;
AnsiString dir=ddir+"\\*.*";
fHandle=FindFirstFile(dir.c_str(),&filedata);
if(fHandle!=INVALID_HANDLE_VALUE)
{
do{
if((str==".")||(str=="..")) continue;
if(filedata.dwFileAttributes&FILE_ATTRIBUTE_DIRECTORY) continue;
slt->Add(filedata.cFileName);
i++;
} 
while(FindNextFile(fHandle,&filedata));
}
return i;
}

------解决方案--------------------
我上面的代码是取文件夹下的文件列表,如果你要目录列表,稍微修改一下
if(filedata.dwFileAttributes&FILE_ATTRIBUTE_DIRECTORY) //判断是否文件夹
{
//添加到你的列表中
}
------解决方案--------------------
TDirectoryListBox和TFileListBox这两个组件是不是你想要的？