Liste der installierten Schriften erstellen
Wer sich nur eine einfache Liste mit den unter Windows 95 installierten Schriften erstellen möchte, braucht dafür nicht unbedingt einen Type-Manager. Word-Besitzer können sich auch mit folgendem Makro behelfen.
Wer sich nur eine einfache Liste mit den unter Windows 95 installierten Schriften erstellen möchte, braucht dafür nicht unbedingt einen Type-Manager. Word-Besitzer können sich auch mit folgendem Makro behelfen:
Sub MAIN
AnsichtKonzept 1
A = ZählenSchriftarten()
For X = 1 To A B$ = Schriftart$(X)
FormatZeichen .Punkt = 12, .Schriftart = `Times New Roman´
EinfĂĽgen B$ EinfĂĽgen Chr$(11) EinfĂĽgen Chr$(11)
FormatZeichen .Punkt = 11, .Schriftart = B$ EinfĂĽgen
`The quick brown fox jumps over the lazy dog.´ Einfügen Chr$(11)
FormatZeichen .Punkt = 11, .Schriftart = B$ EinfĂĽgen
`AaBbCcDdEeFfGgHhIiJjKkLlMmNnOoPpQqRrSsTtUu
VvWwXxYyZzÄäÖöÜüߴ Einfügen Chr$(11)
FormatZeichen .Punkt = 11, .Schriftart = B$ EinfĂĽgen
`1 2 3 4 5 6 7 8 9 0 ! [INTEGRAL] $ % & / () = *,; . :
` EinfĂĽgen Chr$(11) EinfĂĽgen Chr$(11) EinfĂĽgen Chr$(11)
Next X
End Sub
Wer nicht zu den Word-Anwendern zählt, findet für Windows 95 im Internet noch die kostenlose Software `Fontprinter´ von Sebastian Dietz unter http://ourworld.compuserve.com/homepages/drako/FontPrnt.Zip. Das Programm druckt den Schriftnamen sowie eine beliebige und bis zu 40 Zeichen lange Zeichenkette in allen verfügbaren TrueType-Schriften. Etwa 50 davon passen auf eine DIN-A4-Seite, so daß man mit wenig Papier auskommt. ()
