Закрашивание записей в Gridе по условию

← →
Slow (2009-05-06 12:40) [0]

Нужно в гриде закрашивать записи, где поле Date_end (формата даты) не заполнено.
вот текст процедуры, но не могу оформить условие IF:
if (Table1.FieldByName("date_end").value="") - не работает

procedure TFormVvod.DBGrid1DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin

with DBGrid1.Canvas do begin
if (Table1.FieldByName("date_end").value="")
and
not (gdFocused in State) then
begin
Brush.Color :=clred;
Font.Color :=clBlack;
FillRect(Rect);
TextOut(Rect.Left,Rect.Top,Column.Field.Text);
end
else
DBGrid1.DefaultDrawColumnCell(Rect,DataCol,Column,State);
end;

end;

← →
Медвежонок Пятачок © (2009-05-06 12:46) [1]

Table1 - лишнее
FieldByName - тоже лишнее

Получить имя поля и поле через Column
Если поле то что нам надо и если оно изнулл тогда ....

← →
Slow (2009-05-06 13:07) [2]

>Получить имя поля и поле через Column
а что это принципиально? обычно пишу так, но только не с полями формата даты - и всё работает.
А вот с датой нет.
>Если поле то что нам надо и если оно изнулл тогда ....
if (Table1.FieldByName("date_end").value is null) - не работает. Ошибка: Undeclared identifier "null"

← →
Slow (2009-05-06 13:09) [3]

всё получилось.
if (OsnForma.Boll.FieldByName("date_end").asstring="").
Теперь вот другой вопрос.
как при заполнении этого поля сразу вызвать событие DBGrid1DrawColumnCell,чтобы запись в гриде перезакрасилась?

← →
Игорь Шевченко © (2009-05-06 13:11) [4]

> if (Table1.FieldByName("date_end").value="")

А какого типа поле date_end ?

← →
Slow (2009-05-06 13:17) [5]

>Игорь Шевченко © (06.05.09 13:11) [4]
Field type-DATE.

а что это принципиально?

А переименуй TTable и сразу узнаешь.

if (Table1.FieldByName("date_end").value is null) - не работает. Ошибка: Undeclared identifier "null"

Все правильно. Ошибка.

кроме того, если в гриде 10 строк по 10 полей, то филдбайнейм у тебя вызывается 100 раз.
10 раз для дела, и 90 раз вхолостую

Закрашивание записей в Gridе по условию Найти похожие ветки