一、设置某个单元格颜色:
if Column.FieldName='BookListNO' then //按字段为BookListNO'的列,来显示单元格颜色
begin
DBGM.Canvas.Brush.Color := clyellow; //clRed; clgreen 背景色
DBGM.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;
二、设置某个单元格字体颜色:
if (Column.FieldName='BookListNO' then
begin
DBGrid3.Canvas.Font.Color:=clyellow; //clRed; clgreen 单元格字体颜色
DBGrid3.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;