L
lunyx
Unregistered / Unconfirmed
GUEST, unregistred user!
if FindFirst(ADirectory+'/'+ '*', faAnyfile, sch) = 0 then
begin
while FindNext(sch)=0 do
begin
//如何判断 sch.Name是文件还是文件夹??
end;
end;
begin
while FindNext(sch)=0 do
begin
//如何判断 sch.Name是文件还是文件夹??
end;
end;