Delphi - necesito encontrar un archivo

Necesito de una función que me devuelva el nombre del un archivo que busco, por ejm: *.doc y que me devuelva el nombre del primer doc que encontró

Puedes usar las siguientes funciones
· FindFirst para iniciar la búsqueda
· FindNext para buscar el siguiente fichero
· FindClose para terminar la búsqueda y liberar los recursos que reserva la función FindFirst

Un saludo