２重表示をなくすには？ (ID:40548)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 >DEPHI5 ではDelphi５では、正常に表示されるのに、 >同様のソースをDelphi2010で行うと、 >文字が２重表示になるのは >なぜでしょうか？ DELPHI 5 では Canvas.Brush.Style := bsSolid; になっている DELHI 2010 では Canvas.Brush.Style := bsClear; になっている 背景と文字（左寄せ）を描画後に procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState); が実行されるので >(Sender as TStringGrid).Canvas.FillRect(Rect); bsClear なので塗りつぶされない > DrawText((Sender as TStringGrid).Canvas.Handle, PChar((Sender as >TStringGrid).Cells[ACol,ARow]), > Length((Sender as TStringGrid).Cells[ACol,ARow]), > Rect, DT_SingleLine or DT_VCenter or DT_Center); 中央に文字描画 >OffsetRectを入れたけど、 >やり方がマズい？？？ 標準で左寄せになっているのを 中央に表示しようとしているので OffsetRectを入れて文字位置を調整したら意味が無い