Find if a file exists?

[MizardX]

How do i find if a file exists? I'm using Turbo Pascal 7... i couldn't find anything in the help-index that resembles "File existance"

 

[Stretchwickster]

I'm not sure if Pascal has these functions but maybe try:

FileExists('C:\temp\Notes.txt');

FileSearch('Notes.txt', 'c:\temp;c:\Winnt;c:\backup');

Clive

http://www.kucu.co.uk

 

[KLP]

Try this:

function fileExists(fname: String): boolean;                                  
var                                                                           
   f: file of byte;
                                                                   
begin                                                                         
   Assign(f,fname);                                                           
   {$I-}                                                                      
   Reset(f);                                                                  
   {$I+}                                                                      
      if (IOResult = 0) then
      begin
         close(f);
         fileExists:=true;
      end
      else
         fileExists:=false;                                                  
end;