lxldos 2016-02-17 02:33 采纳率: 0%
浏览 2060
已采纳

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条回答

  • threenewbee 2016-02-18 20:15
    关注

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

    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论

报告相同问题?

悬赏问题

  • ¥15 如何在scanpy上做差异基因和通路富集?
  • ¥20 关于#硬件工程#的问题,请各位专家解答!
  • ¥15 关于#matlab#的问题:期望的系统闭环传递函数为G(s)=wn^2/s^2+2¢wn+wn^2阻尼系数¢=0.707,使系统具有较小的超调量
  • ¥15 FLUENT如何实现在堆积颗粒的上表面加载高斯热源
  • ¥30 截图中的mathematics程序转换成matlab
  • ¥15 动力学代码报错,维度不匹配
  • ¥15 Power query添加列问题
  • ¥50 Kubernetes&Fission&Eleasticsearch
  • ¥15 報錯:Person is not mapped,如何解決?
  • ¥15 c++头文件不能识别CDialog