还在初学阶段,这是一段查找文件的代码,各位老师能给说说每句话代表的含义嘛。谢谢啦!
if (SearchRec.Attr and faDirectory = 0) or
(SearchRec.Name<>'.') and
(SearchRec.Name<>'..') then
list.Add(folder + SearchRec.Name);
until FindNext(SearchRec) <> 0;
if (SearchRec.Attr and faDirectory = 0) or
(SearchRec.Name<>'.') and
(SearchRec.Name<>'..') then
list.Add(folder + SearchRec.Name);
until FindNext(SearchRec) <> 0;
解决方案 »
- 监控按键是否按下
- 有没视频转换的控件
- SQL语句问题
- 如何获得本机在公网的ip地址(连接方式为 adsl + hub)
- 大量Delphi电子书下载
- 各位大哥,精通DELPHI和ORACLE的快来啊,帮帮我!!!!!!!!!!!
- 关于操作excel2000的问题!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
- 这是什么意思?
- 左晚下载了delphi6,刚装好,猛一看确实加了好多东西,但更增加了我的迷茫,这么多新东西怎么去掌握,是否有了较好的参考资料和书籍?
- 如何使delphi的stack变得大大的!!
- 关于COM实现多重接口(自定义接口的问题)
- 如何安装TntUnicodeControls_2.3.0
(SearchRec.Name<>'.') and --->如果名字不是“ .”(.代表当前目录)
(SearchRec.Name<>'..') then ---->如果名字不是 ".." (..代表上级目录)
list.Add(folder + SearchRec.Name); ---->把搜到东西添加到List里
until FindNext(SearchRec) <> 0; ----->循环查找直到找不到这个代码实现了在指定目录下搜索文件的功能。
ps:网上找个教程看一下嘛~很多很多的~