Покрасить строчку в DBGrid

← →
Alex-kosmonavt (2004-01-27 10:59) [0]

Как покрасить строчку в нужный цвет, если определенное поле этой строки содержит определенное значение?
Я нашел способ как определить значение, но не могу понять как в процедуре TextOut задать текстовую строку, значение ячейки, хелп!
Вот немного кода
Где вопросики там проблема
With Grid.Canvas do
begin
if (qGetPr.FieldByName("Type").AsString="Main") and not (gdfocused in State) then
begin
Brush.Color:=clRed;
font.Color:=clBlack;
FillRect(Rect);
TextOut(Rect.Left,Rect.Top, ???????? );
end

← →
fdff (2004-01-27 11:02) [1]

Держи краба

if (table1.FieldByName("kolich").Value=999) then
DBGrid1.Canvas.Font.Color := clred;
DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);

← →
Alex-kosmonavt (2004-01-27 11:07) [2]

Ругается говорит не знаю что такое Column

← →
Плохиш_ (2004-01-27 11:07) [3]

Новый курс дошёл до темы раскрашивания грида :-)

← →
Stas © (2004-01-27 11:09) [4]

Ты наверное перепутал событие тебе нужно это:
onDrawColumnCell
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin

← →
Alex-kosmonavt (2004-01-27 11:13) [5]

Точно!
Тьфу, поспешил , и тыкнул в соседний евент, там где ондроу дата селл.

все теперь работает. Сенькс

>Alex-kosmonavt

Когда же поиском то научимся пользоваться? Этот вопрос каждый день задают, максимум через день

Покрасить строчку в DBGrid Найти похожие ветки