Не могу записать дату и время в БД (Delphi)

[Andrey_RTF]

Помогите с кодом. По определенному событию нужно занести данные в БД (Access). Код прилагается.

ADOQuery1.Insert;
         ADOQuery1.FieldByName('Number').AsString:='1';
         ADOQuery1.FieldByName('Time').AsDateTime:=Time;
         ADOQuery1.FieldByName('Date').AsDateTime:=Date;
         ADOQuery1.Post;

В БД полям Time и Date присвоены значения Дата/Время. При возникновении с обытия выскакивает ощибка - "Аргументы имеют неверный тип, выходят за пределы допустимого диапазона или вступают в конфлик друг с другом". БД подключал к приложению при помощи ADOConnection, ADOQuery, DataSourse... Может в этом дело???

[denisbrain]

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

Помогите с кодом. По определенному событию нужно занести данные в БД (Access). Код прилагается.

ADOQuery1.Insert;
         ADOQuery1.FieldByName('Number').AsString:='1';
         ADOQuery1.FieldByName('Time').AsDateTime:=Time;
         ADOQuery1.FieldByName('Date').AsDateTime:=Date;
         ADOQuery1.Post;

В БД полям Time и Date присвоены значения Дата/Время. При возникновении с обытия выскакивает ощибка - "Аргументы имеют неверный тип, выходят за пределы допустимого диапазона или вступают в конфлик друг с другом". БД подключал к приложению при помощи ADOConnection, ADOQuery, DataSourse... Может в этом дело???

запиши в оба 
:=now;
а при выводе маску поставь