Nabend,
was genau verstehst du denn nicht? Wenn du einfach nur dass anwenden möchtest, was du geschrieben hast, dann pack dir einfach den Code von smallsmoker/der CodeLibrary mit in deinen Quelltext und benutze den Beispielaufruf. Bei diesem übergibst du dann eben nicht statisch den Ordner-Pfad, sondern den, den du von deinem Dialog erhalten hast. Danach hast du alle gefundenen Dateien in einer String-Liste (siehe dazu die
OH zu TStringList).
Oder aber geht es dir darum, zu verstehen wie die Ordner durchsucht werden und wie die Dateien gefunden werden? Dann ist der gepostete Code zum Lernen wahrscheinlich etwas ungeeignet, weil da noch viel zusätzliche Sachen mit reinspielen und um das Prinzip erstmal zu verstehen da eigentlich fast alles überflüssig ist
In diesem Fall solltest du mal in der Delphi-Hilfe nach FindNext suchen, da gibts auch ein deutlich einfacheres Beispiel (ohne Rekursion und Masken etc) (und mit Sicherheit im Internet und hier im Forum auch zur Genüge) mit dem dir das auch gelingen sollte
MfG Benedikt