Das Thema ist zwar schon etwas älter, aber die Beispiele in den Beiträgen #11 und #13 haben einen gewaltigen Fehler.
Wenn z.B. in einer Schleife alle Laufwerksbuchstaben von A bis Z auf diese Weise abgefragt werden, gibt es bei Laufwerksbuchstaben, denen kein Netzlaufwerkspfad zugewiesen wurde, dauernd Wiederholungen des letzten gültigen Eintrags.
Warum ? Weil die beiden Autoren vergessen haben, für den Fall, daß einem Buchstaben kein Netzlaufwerk zugewiesen wurde, als Ergebnis einen Leerstring zurückzuliefern.
Ein einfaches
result:=''; gleich hinter "Len := 0;" bzw. "nLen := 0;" behebt den Fehler. Übrigens habe ich keinen Vorteil des längeren Beispiels feststellen können. Es ist lediglich aufgebläht.