Zitat von
Khabarakh:
Zitat von
Kalfany:
unter c# gibts beim fontdialog die eigenschaft "AllowVerticalFonts" die genau das regelt
Und zwar über
CHOOSEFONT mit dem Flag CF_NOVERTFONTS.
Thanks, das wars.
Hab zwar versucht Konstanten der
MSDN mit der Implementierung in Dialogs.pas zu vergleichen aber irgendwie ist mir diese Konstate abhanden gekommen das genau diese nicht üper das Option-Property setzbar ist. Da wir ehe einen abgeleiteten Font-Dialog haben ist die Anpassung nur eine Ergänzung
or CF_NOVERTFONTS
in der Zeile
Flags := Devices[FDevice] or (CF_INITTOLOGFONTSTRUCT or CF_ENABLEHOOK);