如何在dbgrid中让当前选中记录反白显示,(100分)

当记录被选中时,把字体的颜色改为蓝色,背景色改为白色.请各
位高手不吝指教.在下感激不尽

响应dbgrid的OnDrawColumnCell事件
对于State参数中包含gdSelected的数据
设置它的Font和Color就是了。
//处理选择中
if gdSelected in State then
begin
dbgrid1.Canvas.Font.Color:=clBlue;
dbgrid1.Canvas.Brush.Color:=clWrite;
end
else
dbgrid1.Canvas.Font.Color:=Column.Font.Color;
//调用原处理过程,实现基本的显示效果
dbgrid1.DefaultDrawColumnCell(Rect,DataCol,Column,State);
end;

http://www.delphibbs.com/delphibbs/dispq.asp?lid=160803

哦

非常感谢杜宝的不吝指教.在下送你100分