Cette fonction permet d'effectuer une rechercher d'élément dans un répertoire contenant des fichiers et répertoires.
Function FindFirst(const Path: string; Attr: Integer; var F: TSearchRec): Integer;