Системная дата и запись в ADOQuery

[L3zh1Y]

Ребят, подскажите, можно ли как-нибудь сравнить системную дату выведенную в StatusBar и с записью даты в ADOQuery?

[Serge_Bliznykov]

а зачем брать что-то, выведенное в StatusBar ?!
Банальное

if Trunc(AdoQuery1.FieldByName('НужноеПолеДаты').AsDateTime) = trunc( now )  then
 // даты равны

Вас чем-то не устраивает?!

[Stilet]

Если не ошибаюсь.

if ADOQuery.FieldByName('имя поля').AsDateTime=date then
 системная дата и в поле совпадают

Тут еще нужно знать хранится ли время в поле или нет

[L3zh1Y]

Сообщение от Serge_Bliznykov

а зачем брать что-то, выведенное в StatusBar ?!
Банальное

if Trunc(AdoQuery1.FieldByName('НужноеПолеДаты').AsDateTime) = trunc( now )  then
 // даты равны

Вас чем-то не устраивает?!

Спасибо, я недавно начал работать только с базами, по-этому сильно не пинайтесь пожалуйста... И grid плохо знаю.
Теперь мне нужно закрасить ячейку с датой, если она совпадает с системной в красный, написал вот такой код, но она закрашивает всю строку, а нужно только ячейку:

if Trunc(DataModule3.ADOQuery1.FieldByName('GTO').AsDateTime) = trunc( now )  then
DBGrid1.canvas.Brush.Color:=clred;
         //DBGrid1.Canvas.Font.Color := clWhite;
         DBGrid1.Canvas.FillRect(Rect);
         DBGrid1.Canvas.TextOut(Rect.left + 2, Rect.top + 2, Column.Field.Text);

[Stilet]

А где этот код помещается?

[L3zh1Y]

в событие onDrawColumnCell

[L3zh1Y]

Всем спасибо, разобрался сам, если кому будет полезно, то я перед всем предыдущим кодом добавил всего одну проверочную строку:

 if Column.FieldName = 'GTO' then
if Trunc(DataModule3.ADOQuery1.FieldByName('GTO').AsDateTime) = trunc( now )  then
DBGrid1.canvas.Brush.Color:=clred;
         //DBGrid1.Canvas.Font.Color := clWhite;
         DBGrid1.Canvas.FillRect(Rect);
         DBGrid1.Canvas.TextOut(Rect.left + 2, Rect.top + 2, Column.Field.Text);