TSearchRec bei Dateien/Ordner mit Unicode-Namen

[Ares]

Hallo!

Ich brauche für ein Programm Funktionen die mir eine Liste aller Unterordner oder aller Dateien in einem Verzeichnis liefern. Das ist mit TSearchRec und FindNext() ja kein Problem. Nun wir das Programm aber auf Rechnern eingesetzt bei den viele Ordner und Dateinamen Unicode Zeichen enthalten und hier stößt TSearchRec anscheinend an seine Grenzen.

Hab ich z.B. einen Ordner "Προγράμματα Διαφήμισης" liefert mir TSearchRec den Namen "'??????µµata ??af?µ?s??'". Versuche ich dann diesen Ordner zu öffnen erhalte ich natürlich die Meldung, dass kein Ordner mit diesem Namen existiert...

Ich verwende Delphi 2007, gibt es hier irgendeine Möglichkeit Datei- und Ordnernamen in Unicode zu ermitteln?

Besten Dank!
Ares