16番会議室「玉石混淆みんなで作るSample蔵」に寄せられたサンプル
"RE:TStringGridの使い方例"
この発言は #00518 TN さんのTStringGridの使い方例 に対するコメントです
この発言に対し以下のコメントが寄せられています
#00524 TN さん RE^2:DrawTextの使い方例
TN さん、こんにちは。Satobe です。
重箱の隅をほじくるようで申し訳ないのですが...(^^;
procedure DrawString の
> DrawText(Canvas.Handle, PChar(S), -1, DrRect, (DT_EXPANDTABS or
> DT_VCENTER) or Alignments[Alignment]);
DrRectの高さは FontHeight使って「自前で DT_VCENTER処理」しちゃっ
てますから、ここの DT_VCENTERは無意味ですよね。
#そもそも DT_VCENTER使うなら DT_SINGLELINEも指定しないと...
それから、VCLソースを見ると
> FontHeight := Canvas.TextHeight('W');
この部分は Canvas.TextHeight('Wg');ってやってるのが多いですね。
98/05/03(日) 02:15 Satobe(JCG00336)
Original document by Satobe 氏 ID:(JCG00336)
ここにあるドキュメントは NIFTY SERVEの Delphi Users' Forum の16番会議室「玉石混淆みんなで作るSample蔵」に投稿されたサンプルです。これらのサンプルはボーランド株式会社がサポートする公式のものではありません。また、必ずしも動作が検証されているものではありません。これらのサンプルを使用したことに起因するいかなる損害も投稿者、およびフォーラムスタッフはその責めを負いません。使用者のリスクの範疇でご使用下さい。
Copyright 1996-2002 Delphi Users' Forum
|