Как в таблице изменить фон текущей ячейки?

← →
Reaper (2004-03-10 01:36) [0]

Как в таблице изменить фон некоторых ячеек(выборочно НЕ ВСЕХ)?

← →
Hawk2 © (2004-03-10 01:43) [1]

Фон ячейки меняется в DBGrid, а таблица тут не причем!!!
Поищи на Королевстве Делфи статью "Разноцветный Грид" или чтото в этом роде.

procedure TFormInfo.DBGrid1DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
IF DBGrid1.DataSource.DataSet.FieldByName("date_next").AsDateTime<=now
Then DBGrid1.Canvas.Font.Color:=clred
Else DBGrid1.Canvas.Font.Color:=clblue;

IF (gdSelected in State) AND DBGrid1.Focused
Then DBGrid1.Canvas.Font.Color:=clHighLightText;

DBGrid1.DefaultDrawColumnCell(Rect,DataCol,Column,State);

end;

Как в таблице изменить фон текущей ячейки? Найти похожие ветки