IdFTP: Alles auflisten

[Z4ppy]

Ich suche nach einer Methode, alles auf einem FTP aufzulisten (in einer TStringList)... Dabei möchte ich sowohl nur Dateien, als auch nur Ordner (bzw. die untersten Unterordner) auflisten können. Ich nenn meine Funktion jetz einfach mal auflisten(var a:TStringList; folder:boolean); - wenn folder true ist, werden die untersten Unterordner aufgelistet, wenn folder false ist, die Dateien...

Beispiel:
foldera
--folderaa
----aaa.dat
----aab.dat
--aa.dat
folderb
--folderba
----folderbaa
------folderbaaa
----baa.dat

auflisten(a,false):

Code:

foldera/folderaa/aaa.dat
foldera/folderaa/aab.dat
foldera/aa.dat
folderb/folderba/baa.dat

auflisten(a,true):

Code:

foldera/folderaa
folderb/folderba/folderbaa/folderbaaa

Ich hab irgendwie überhaupt keine Ahnung, wie ich das am besten angehen soll

MfG Z4ppy

PS: In welcher Reihenfolge das Resultat zurückgegeben wird, ist mir ziemlich wurst. Hauptsache, es kommen exakt diese Strings zurück (und keine anderen) ^^