触发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;
这个是我想实现固定字段整行变色的代码,为什么运行以后没有变色
Delphi6中, DBGrid控件的OnDrawColumnCell方法到底什么时候会触发
- 写回答
- 好问题 0 提建议
- 追加酬金
- 关注问题
- 邀请回答
-
1条回答 默认 最新
- threenewbee 2016-02-18 20:15关注
在窗口被遮挡等情况下都会重绘,你的开发环境遮挡了控件就会反复触发。所以调试这样的代码,最好不要单步,而是增加一点调试输出。
在你这段代码中没有看到绘制的逻辑,所以它肯定不奏效了。本回答被题主选为最佳回答 , 对您是否有帮助呢?解决 无用评论 打赏 举报
悬赏问题
- ¥15 matlab提取运动物体的坐标
- ¥15 人大金仓下载,有人知道怎么解决吗
- ¥15 一个小问题,本人刚入门,哪位可以help
- ¥15 python安卓开发
- ¥15 使用R语言GD包一直不出结果
- ¥15 计算机微处理器与接口技术相关问题,求解答图片的这个问题,有多少个端口,端口地址和解答问题的方法和思路,不要AI作答
- ¥15 如何根据一个截图编写对应的HTML代码
- ¥15 stm32标准库的PID角度环
- ¥15 ADS已经下载好了,但是DAS下载不了,一直显示这两种情况,有什么办法吗,非常急!
- ¥100 Excel 点击发送自动跳转outlook邮件