问个delphhi的搜索的问题
function TForm1.CurrentIsValidDir(SearchRec:TSearchRec):integer; //从搜索记录中判断是否是子目录
begin
if ((SearchRec.Attr <> 16) and
(SearchRec.Name <> '. ') and
(SearchRec.Name <> '.. ')) then
Result:=0
else if ((SearchRec.Attr = 16) and
(SearchRec.Name <> '. ') and
(SearchRec.Name <> '.. ')) then
Result:=1
else
Result:=2;
end;
这里的SearchRec.Attr <> 16
SearchRec.Name <> '. '
SearchRec.Name <> '.. '是什么意思？特别是 '. '和 '.. '有什么特殊含义吗？
[解决办法]
每个文件夹下面都有 ". " ".. "这两个文件，但是看不到，开始-运行-cmd，输入dir就可以看见了
".. "代表返回上一个文件夹， ". "貌似没什么用
SearchRec.Attr <> 16是代表“文件夹”属性
[解决办法]
回忆一下 DOS 3.1
