>>紧急求助！如何设置DBGRID单元格颜色?见者有分！<<

[lanble]

如何设置DBGRID单元格颜色,不是一行或一列的颜色，而是某一个具体单元格的颜色！

[wuyh78]

^_^^_^：此问题，我已经做过，也已经解决，具体实现如下：
1、获得单元格所在的TRect；
2、在每一单元格，选择你想用的位图进行填充；

[machin]

对啊，我跟cultra做的一样，都是要自己画的。

1 先画色层

2 写文字

好了，我要领分了。。。

[lizy1998]

if ((str1='收入') or (str1='存入')) then
begin
oldpm:= DBGridMain.Canvas.pen.mode;
oldcolor:= DBGridMain.Canvas.Brush.color;
DBGridMain.Canvas.Brush.color:=$B6F2B6;//RGB颜色，可以先在photoshop里调好
dbGridMain.Canvas.pen.mode:=pmmask;
DBGridMain.DefaultDrawColumnCell(Rect, DataCol, Column, State);
DBGridMain.Canvas.Brush.color:=oldcolor;
DBGridMain.Canvas.pen.mode:=oldpm;
end;

[lanble]

各位大虾，还有别的见解，尽量提，我再加分！谢谢合作！

[ie4888]

恐怕你得试试PwoerInfo的TwwDBGrid

[dingsg111]

自己画

[Mark_zheng]

呵呵！我也有分？？？

[gototop99]

请你试一试用 DbGrid 的 DrawColumnCell 方法吧，这个问题就可以解决的。

以前我试过了，可以。

[kuangning]

用twwDBGrid

[cultra]

if POS('星期',Column.Field.AsString)<>0 then
DBGrid1.Canvas.TextRect( Rect, Rect.Left+2, Rect.Top+2,copy(Column.Field.AsString,1,10)+' 星期'+WeekDayTranChs(DateNum));


写在DBGrid1DrawColumnCell()中，上面写的是当字段的值中有“星期”子窜的时候，重画该单元。你或许可以在这个时候设置BRUSH，改变颜色的。

[bpmb2]

这样简单点:
DBGrid1DrawColumnCell()中
if ......then
dbgrid1.canvas.font.color:=clred
else
dbgrid1.canvas.font.color:=clhighlighttext
......

[machin]

在DBGrid1DrawColumnCell事件里写：
if state=cbselected then
with DBGrid1.Canvas do
begin
Brush.Color := clRed;
Brush.Style := bsSolid;
FillRect(Rect);
end;

你去试试看吧。。。

[dqiuqiu]

我也想知道啊！幸好有人解答了，并且我还有分吗？岂不是熊掌与鱼兼得！：）

[jiangcfei]

我的方法你试了行的话，就给分了，否则我的积极性就没了。

[qq_13439718]

infopower3000

[dana]

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if query1.recno mod 2<>0 then dbgrid1.canvas.Brush.color:=$00eaeaea;
dbgrid1.DefaultDrawcolumnCell(rect,datacol,column,state);
end;

[wljcr]

来晚了！

[dxpjj]

哈哈,居然有人回答,我也用不着提问了!

[tongdings]

gz

[jiangcfei]

在DBGrid1DrawColumnCell
if DataCol = 1 then
with DBGrid1.Canvas do
begin
Brush.Color := clRed;
Brush.Style := bsSolid;
FillRect(Rect);
end;
DBGrid1.DefaultDrawColumnCell(Rect,DataCol,Column,State);

别忘了，给分啦！