ComboBox1.Items := (ordner).Fonts;

[Nalincah]

Vielleicht kannst du versuchen die font in das windows\fonts-verzeichnis zu kopieren, dann benutzen und danach wieder löschen. Weiß aber nicht wie. Such mal was in der Libary bei kopieren.

[horst]

die idee ist gut, nur was ist wenn der fontordner 600 mb groß ist

[Nalincah]

der windows/font oderner oder der den du ausliest?

[horst]

den ich versuche auszulesen ...

[Nalincah]

Du sollst ja auch nicht alle kopieren, sondern immer nur die, die benutzt wirst. Pass aber auf. Wenn in deinem Ordner ne Font "Arial.ttf" ist und du die in "C:\Windows\Fonts\" kopieren willst gibts die da ja meistens schon. Wenn du die jetzt überschreibst und danach löscht ist sie weg. Also nur reinkopieren wenn es die Schrift noch nicht gibt

[horst]

stimmt das könnte ich versuchen ...merci