读取一个目录的文件，有什么好控件？？？？？?(100分)

读取一个目录的文件，有什么好控件？？？？？

win3.1页中的TFileListBox停好呀

I agree with Brave.

怎么什么都要空间啊
给你个例子先，递规查找文件的
procedure FileSearch(PathName:string);
var
F : TSearchRec;
Found : Boolean;
begin
ChDir(PathName);
Found := (FindFirst('*.*', faAnyFile, F) = 0);
while Found do
begin
if (F.Name = '.') or (F.Name = '..') then
begin
Found := (FindNext(F) = 0);
Continue;
end;

if (F.Attr and faDirectory)>0 then
begin
Application.ProcessMessages;
FileSearch(F.Name);
end;
//插入你的代码，F.Name就是文件名，GetCurrentDir可以得到当前目录
Found := (FindNext(F) = 0);
end;
FindClose(F);
ChDir('../');
end;

控件我有现成的，金智塔的财务软件就用过这些控件，巨多的东东，
有播放gif等等 的控件包。
可以有下拉的小计算器等。有源码的![8D][8D][8D][8D]
email给我，我发啊，不过记着一定要给分啊!
emailtohong@chinese.com

接受答案了.