[Delphi] Cercare files

[bDaniele]

function FindFirst(const Path: string; Attr: Integer; var F: TSearchRec): Integer;