TurboPascal CHR Schriften

[mimi]

Deine Frage ist etwas ungenau Beschrieben.

Möchtest du einfach ein Text über TextOut über Canvas ausgeben und dabei die Schrift Verstellen ?
Das geht mit Canvas.Font.Name:='Name des Font'.

Oder möchtest du die Alten Schrift Arten in neueren Projekten Nutzen ?

Deine Frage lässt noch mehr Spielraum für weitere Antworten... für mich aufjedenfall *G*
(Das soll keine Beleidigung da stellen)