得到一个文件夹下面的所有文件名称,把它保存在StringList里面。
请问怎么实现?
请问怎么实现?
解决方案 »
- cxDateEdit1.date日期时间型字段为空
- 寻找Delphi版里的高手——如何截获Delphi 2005的IDE中Compile菜单项发出的编译命令?
- 如何通过串口发送一个给定的小数给单片机?
- 祝大家节日快乐!
- 项目组招兼职人员(上海)
- 各位高手,如何将ASCII码表示的数据转换成十六进制表示的数据,有没有什么函数?相信这里还是有高手的,不会连这个问题都解决不了吧??
- ***请教高手,用DCOM怎么在客户端向服务器指定的目录发送文件?***
- abort如何使用
- 怎么加进度显示????????
- 如何在对话框中显示变量
- 厦门招聘.Net Delphi技术员/工程师。
- 大家帮我分析一下,是我的错误还是delphi的bug???
var
vSearchRec: TSearchRec;
vStringList: TStringList;
begin
vStringList := TStringList.Create;
if FindFirst('c:\temp\*.*', faAnyFile and not faDirectory, vSearchRec) = 0 then
begin
repeat
vStringList.Add(vSearchRec.Name);
until FindNext(vSearchRec) <> 0;
FindClose(vSearchRec);
end;
ShowMessage(vStringList.Text);
vStringList.Free;
end;
FindFile1.find('D:\','*.*');
Memo1.Lines:=FindFile1.FoundList;