Für meine Anwendung nutze ich folgende Routine um einen Font zu
wählen (Ausschnitt aus dem Open-Event eines Popup Menüs):
 Anzahl = FontCount - 1
 for i = 0 to Anzahl
   name.Append Font(i)
 next

Damit bekomme ich zwar die Schriftnamen, ich beötige aber den
Postscript-Namen.

So zeigt mir die Schriftsammlung den Namen "Lucida Grande", den ich mit
der Routine ebenfalls bekome, der Postscript-Name lautet aber
"LucidaGrande".
Meist reicht es, die Leerzeichen zu entfernen. Allerdings gibt es aber
auch beispielsweise "Hoefler Text" mit Postscript-Namen
"HoeflerText-Regular" oder "Arial Black Standard" mit Postscript-Namen
"Arial-Black".

Hat jemand eine Idee, wie ich den Postscript-Namen der Fonts bekomme?

Gruß, Stefan Mettenbrink.

Antwort per Email an