Hola nena_yei.
Se me ocurrió algo usando la función
SetErrorMode ...
Probá este código:
Código Delphi
[-]
function MiFileExists(Nombre: string): boolean;
var
Error: Word;
begin
Error:= SetErrorMode(SEM_FailCriticalErrors);
if FileExists(Nombre) then
Result:= True
else
Result:= False;
SetErrorMode(Error);
end;
Ejemplo de llamada:
Código Delphi
[-]
if MiFileExists('D:\RUTA\NOMBRE.EXT') then
Saludos.