Morgen!
Versuchs mal mit
function BuildFileList(const Path: string; const Attr: Integer; const List: TStrings): Boolean;
aus der
Unit JclFileUtils.
Und wenn du daran interessiert bist, zu verstehen was du da nutzt, sieh mal in der
OH unter
FindFirst und
FindNext nach.