フォントダイアログで選択したフォントの向き

解決

サンプー 2009-11-19 23:42:36 No: 36207

del6Pro,Xp sp3です
久しぶりにDelphiに戻ってきて、過去のコードの見直しをしています。
ひとつ、気づいたことなのですが、フォントダイアログを利用して、フォントの一覧からあるフォントを選択すると、フォントダイアログの画面右中央部にサンプルが表示されると思います。
ここで問題なのですが、アルファベットは縦表示、日本語は９０度回転して寝た形で表示されます。
この現象で、悩んでいます。
どなたか、解決方法をご存知ですか？

ひょっとして 2009-11-20 00:37:22 No: 36208

頭に「@」のついたフォントを選択していませんか？
それはいわゆる縦書き用フォントで、右に90度回転させると正しく表示されます。

ちなみにChooseFontには縦書きフォントを表示させないためのCF_NOVERTFONTSフラグがありますが
TFontDialog.Optionsには該当するものがないようですね。
もし@付きのを選ばれたくなかったら、フォント選択された後でエラーにするか
自分でChooseFontを呼び出すしかないのか……

サンプー 2009-11-20 03:02:38 No: 36209

ひょっとしてさんレスありがとうございます。
やっぱりそうですか！！
考えを少し整理してみます
ありがとうございました