TStringGridのセルに文字を縦書きするには?

解決


ぱぱ  2003-12-01 23:05:28  No: 5865  IP: [192.*.*.*]

もうしわけありません。途中で間違って送信してしまいました。
TStringGridのOnCellDrawイベントを書いてフォーマットした文字列をセルに表示しております。(OnCellDrawイベントのなかでStringGrid1.CanvasにTextRectを使って表示しております)実は、非常に縦長のセルがありそれに数字や日付を縦書き表示(時計と反対周りに90度回転させたように)したいと考えておりますが、方法がわかりません。どなたかご存知の方、教えていただけますでしょうか。よろしくお願いします。
当方、週末プログラマーでつい先日DERPHI6.0personalダウンロードして使い始めたばかりです。

編集 削除
LupinⅢ  URL  2003-12-02 11:22:04  No: 5866  IP: [192.*.*.*]

ヒントになるかわかりませんが一応ここにそのようなことが記されています。
http://www2.big.or.jp/~osamu/Delphi/Tips/key.cgi?key=25#0137.txt

編集 削除
Halbow  2003-12-02 12:09:29  No: 5867  IP: [192.*.*.*]

Halbow です。

http://www2.big.or.jp/~osamu/Delphi/Tips/key.cgi?key=25#0137.txt

この Tips ははじめから TLogFont を組み立てていて効率よくありません。
GetObject() を使えば、現在の Canvas の Font から、描画方向だけを
変更したフォントを作れます。以下が参考になると思います。

http://halbow.cool.ne.jp/Notes/N003.html

編集 削除
ぱぱ  2003-12-02 13:20:42  No: 5868  IP: [192.*.*.*]

Halbowさん、LupinIIIさん、早速の情報ありがとうございました。
特にHalbowさんのHPはこれからもいろいろ参考にさせて頂きます。
ありがとうございました。

編集 削除