请问怎样使ExpressQuantumGrid网格中的数字小于0时就使它红色显示呢》?
解决方案 »
- 对视图进行查询操作
- 我想让一个函数不要立即返回,在执行完一些操作后再返回
- DELPHI7中的DOS程序在哪个文件夹?
- 想为控件实例指定一个自己的事件处理方法, 这个方法过程应该怎么定义?
- 100回报
- 为了使Tedit在获取/失去焦点时改其背景色,特地做了个派新类Tedit1,但却达不到效果.请看一下源码...
- 到Delphi的数据库版块找一个帖子,散分
- 为什么很多代码使用Recored时候实际用Record的指针?
- 強烈推荐——一个老程序员的心里话 1(转)
- ********如何遍例菜单中的菜单项?*******急!急!急!急!急!急!急!急!急!急!急!*****************
- DELPHI如何调用GetWindowThreadProcessId?
- 倾囊送分,ReportBuilder问题,跪求高手作答
begin
DBGrid1.Canvas.Font.Color := clRed;
end;
DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);
以上是DBGrid的改为ExpressQuantumGrid就可以拉!
Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
begin
if AViewInfo.GridRecord.Values[cxg1DBTableView1.GetColumnByFieldName('job_id').Index < 0 then
ACanvas.Brush.Color:=clred
else ACanvas.Brush.Color:=clwhite;
end;