home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #1 / NN_1993_1.iso / spool / comp / lang / pascal / 7996 < prev    next >
Encoding:
Internet Message Format  |  1993-01-09  |  941 b 
  1. From: tp923021@jarrah.canberra.edu.au (ben elliston)
  2. Sender: gateway@f262.n620.z3.fidonet.org
  3. Path: sparky!uunet!munnari.oz.au!manuel.anu.edu.au!sserve!f262.n620.z3!gateway
  4. Newsgroups: comp.lang.pascal
  5. Subject: FindFirst
  6. Message-ID: <726632204.AA00152@f262.n620.z3.fidonet.org>
  7. Date: Sun, 10 Jan 1993 02:14:00
  8. Lines: 16
  9.  
  10. I have stumbled across a problem with the FindFirst procedure ..
  11.  
  12. I'm using:
  13.  
  14.   FindFirst('C:\*.*', Hidden, SearchInfo);
  15.  
  16. Where SearchInfo is a SearchRec variable and I am using the DOS unit.  It seems FindFirst (when used in conjuction with the FindNext procedure), finds all files matching the wildcard specification, but not the attribute specification.
  17.  
  18. I got around the problem by using an:
  19.  
  20.   If SearchInfo.Attr = Hidden Then ...
  21.  
  22. but it's ugly and slower.  Is it a bug that I've stumbled on?  I can reproduce this bug using Turbo Pascal 5.5 and 6.0 even using example source code from the help file!
  23.  
  24. Thanks.  
  25.  
  26.