En la ayuda de Delphi te viene un ejemplo claro de su uso.
Código:
procedure TForm1.Button4Click(Sender: TObject);
var
FileToFind: string;
begin
FileToFind := FileSearch(NombreArchivo.xxx', GetCurrentDir);
if FileToFind = '' then
ShowMessage('No se ha podido encontrar NombreArchivo.xxx')
else
ShowMessage('NombreArchivo.xxx');
end;
Le pasas a FileSearch un nombre de archivo y un directorio y si no lo encuentra la funcion no te devuelve nada.
Pruebalo.