lxldos
lxldos
采纳率11.8%
2016-02-17 02:33

Delphi6中, DBGrid控件的OnDrawColumnCell方法到底什么时候会触发

已采纳

触发OnDrawColumnCell后,我进行单步调试,貌似程序就在里面进行死循环了,不停执行,为什么。

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if DBgrid1.DataSource.DataSet.FieldByName('ORG').AsString = 'SUP' then
DBgrid1.Canvas.Font.Color := clGreen;
end;
这个是我想实现固定字段整行变色的代码,为什么运行以后没有变色

  • 点赞
  • 写回答
  • 关注问题
  • 收藏
  • 复制链接分享
  • 邀请回答

1条回答

  • caozhy 从今以后生命中的每一秒都属于我爱的人 5年前

    在窗口被遮挡等情况下都会重绘,你的开发环境遮挡了控件就会反复触发。所以调试这样的代码,最好不要单步,而是增加一点调试输出。
    在你这段代码中没有看到绘制的逻辑,所以它肯定不奏效了。

    点赞 1 评论 复制链接分享

相关推荐