Как изменить цвет текста в DBGrid?

← →
viper (2002-12-23 17:27) [0]

Есть заполненая таблица, и мне нужно некоторые строки выделить другим цветом, т.е. если тип(такое поле) этой записи 1 то скажем строка красным цветом! Если можно, то кинте кусочек кода!

← →
Delirium^.Tremens (2002-12-23 17:28) [1]

OnDrawColumnCell + FAQ

← →
Леший (2002-12-23 17:39) [2]

with DBGrid1.Canvas do
begin
if (Column.Field.FieldName = "CLOSE") and
not (gdSelected in State) then
if strtofloat(Column.Field.Text)<0 then
begin
Brush.Color:=clRED;
Font.Color:=clWHite;
FillRect(Rect);
TextOut(Rect.Left+2,Rect.Top+2,FormatFloat("### ### ###.##",StrToFloat(Column.Field.Text)));
exit;
end;
DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State)
end;

Как изменить цвет текста в DBGrid? Найти похожие ветки