Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!casbah.acns.nwu.edu!nucsrl!igloo!infopls!hoffmann
From: hoffmann@infopls.chi.il.us (Robert Hoffmann)
Newsgroups: comp.lang.pascal
Subject: Re: FindFirst
Message-ID: <9Nye12w164w@infopls.chi.il.us>
Date: 14 Apr 91 21:53:43 GMT
References: <1991Apr10.134936.13981@odin.diku.dk>
Organization: INFOPLUS support, Wheeling, IL
Lines: 26

ballerup@diku.dk (Per Goetterup) writes:

> Robert_Salesas@mindlink.UUCP (Robert Salesas) writes:
> 
> =>I'm having a problem with FindFirst in Turbo Pascal 6.  I modified the List
> =>demo by exluding the ReadOnly flag in the attributes.  This should not incl
> =>readonly files, yet it does.  Anyone have an idea why?
> 
> Another related problem, maybe with the same cause:
> 
> Try simply to search for directories using the 'Directory' attribute mask
> and you'll not only find directories but also close to everything else (I
> think, perhaps VolumeID's excluded).
 
From the manual (what, you don't have the manual? <GRIN>):
 
"The ATTR parameter specifies the special files to include (in addition 
to all normal files)."
 
You use FindFirst/FindNext to get the file, *then* compare 
(SearchRec).Attr to one of the predefined constants to see if the 
returned filespec matches what you want.
 
Rob
---------------------------------
hoffmann@infopls.chi.il.us