Re: JCL 1.97 BuildFileList

I run BuildFileList(..., faAnyFile and not faDirectory,...)
but in some cases (in WinXP)
SearchRec.Attr =3D=3D $20020.  But faAnyFile and not faDirectory =3D=3D $2F=
=20

What is Attr $20000? I don't know....

so I changed this call to:
BuildFileList(..., ($F000 or faAnyFile) and not faDirectory,...)


> > I just upgraded my JCL from 1.22 to 1.97, and I'm finding a few
things=20
> > broken.
> >
> > In JclFileUtils.BuildFileList, for example, the code that used to read
> >
> > if (SearchRec.Name <> '.') and (SearchRec.Name <> '..') then
> > List.Add(SearchRec.Name);
> >
> > now reads
> >
> > if (SearchRec.Name <> '.') and (SearchRec.Name <> '..')
> > and ((SearchRec.Attr and Attr) =3D SearchRec.Attr) then
> > List.Add(SearchRec.Name);
> >
> > The added check on attributes is causing this function no longer to
> > be a simple wrapper for FindFirst, FindNext, FindClose. When I roll
> > my own file list, I do
> >
> > FindFirst('c:\foo\*.*', 0, SearchRec);






------------------------ Yahoo! Groups Sponsor --------------------~-->=20
Everything you need is one=A0click away.=A0 Make Yahoo! your home page=A0no=
w.
http://us.click.yahoo.com/AHchtC/4FxNAA/yQLSAA/i7folB/TM
--------------------------------------------------------------------~->=20

=20
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/Delphi-JEDI/

<*> To unsubscribe from this group, send an email to:
    [email protected]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
=20