[Casimiro Noteví]

pues según tu código sería algo así como:

Código Delphi [-]
 if (FileExists( GetWindowsSysDir+'Archivo.PRS' )) then begin 
   ShowMessage('Archivo encontrado')
 else
   ShowMessage('Archivo No  encontrado');