Sorry für die späte Antwort
Danke für die ganzen Antworten, aber leider hatte keine davon den gewünschten Effekt, wie ich es haben wollte
Ich habe es einfach so gelöst, dass ich vor dem SelectDirectory die Ordnernamen aus dem Ordner auslese, einer StringListe hinzufüge, den letzten bzw "jüngsten" Ordnername auswähle und diesen dann noch bei SelectDirectory bei dem Pfad dran häng.
[Edit]Oder man stellt sich nicht so dumm an wie ich und schaut mal hier in der Codelib nach
http://www.delphipraxis.net/21136-di...zuwaehlen.html Das 3. Beispiel ist genau das was ich gesucht habe
[/Edit]