[Eldar1991]

Добрый день! Возможно данный вопрос уже поднимался ранее, но все таки. Как грамотно сделать изменение цвета строки DBGrid по выполнению определенного условия, а именно: есть поле с датами. по истечению установленного срока от каждой из дат строка должна изменять цвет на красный (просрочено). Как это реализовать? Событие OnDrawDataCell мне не понятно, код компилируется но действия не происходит. Вызов этого события из других процедур также не получается, не компилирует. Помогите пожалуйста

[NumLock]

Do not write an OnDrawDataCell event handler. OnDrawDataCell is obsolete and included for backward compatibility. Instead, write an OnDrawColumnCell event handler.

используй OnDrawColumnCell. вкратце:

Код:

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
    DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
  if (OraQuery1.FieldByName('KODNAIM').AsInteger mod 2)=0 then
    DBGrid1.Canvas.Brush.Color:=clRed;
  DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;

[Eldar1991]

попробовал. изменил тип с integer на datetime т.к. ругался что к полю не применимо. и вот:

Код:

Operator not applicable to this operand type

[NumLock]

так у тебя и поля KODNAIM скорее всего нет! условие проверка на четность чисто для примера написано.