Нестандартная задача с цветами ячеек ДБГрид!

[Abbatik]

Искал по форуму ничего подходящего нет!

Подскажите плз такую вещь!

Таблица 5 полей:
в 5-ом поле значение true/false.
в зависимости от этого значения надо окрасить ячейку во 2-ом поле

Например
1________2________________3____4___ __5
ааа______(red)12111________,,____!! !____true
bbb______(green)17332______\\___))) ____false
ccc______(red)12541________--____!!!___true

подскажите можно ли как нибудь это сделать.......

[Yurk@]

Можно пройтись циклом по всем строчкам и проверить на правильность условия - после этого красить в нужный цвет!

[mihali4]

Самый простой способ:

procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect; Field: TField; State: TGridDrawState);
begin
if Field.Index=1 then
begin
if DBGrid1.DataSource.DataSet.Fields[4].Value=False then
DBGrid1.Canvas.Brush.Color:=clGreen else
DBGrid1.Canvas.Brush.Color:=clRed;
DBGrid1.DefaultDrawDataCell(rect, field, state);
end;
end;