Article #15703: FINDFIRST - THE EXISTENCE OF FILES

 Technical Notes Database

TN703D.txt   FINDFIRST - THE EXISTENCE OF FILES
Category   :Pascal
Platform    :All
Product    :Turbo Pascal  4.0+

Description:
Q.  How can I check to see if a File Exists?
A.  The following function will return whether or not
   a file exists:

      Uses DOS;

      function Exist( Name: PathStr ):boolean;
      Var
        Search: SearchRec;
      Begin
        FindFirst( Name, AnyFile and (Not Directory), Search );
        Exist := DosError = 0;
      End;



Reference:


7/16/98 4:35:35 PM
 

Last Modified: 01-SEP-99