Как занести текущую дату в поле таблицы типа "Дата"?

[Аватар]

Ни в жизнь не поверю в связи с этим, что код из #16 не работал. Он только время убирал из DateTime

[Serge_Bliznykov]

я в шоке!
дело в том, что если Вы откроете исходники классов Delphi:

unit ComCtrls;

  TDateTimePicker = class(TCommonCalendar)
...

  TCommonCalendar = class(TWinControl)
...
    property Date: TDate read GetDate write SetDate;
    property DateTime: TDateTime read FDateTime write SetDateTime;


unit Controls;
...
  TDate = type TDateTime;

то увидите, что TDate и TDateTime - это один и тот же тип данных!

(кстати, никто не мешает Вам вывести значение
DateTimePicker1.Date и DateTimePicker1.DateTime и сравнить их!!)


Впрочем, плевать на теорию. Заработало - и свала Богу!

[Аватар]

TDate и TDateTime - это один и тот же тип данных!

Там при присвоении значения в параметр анализируется тип и возможно TDate и TDateTime как-то по разному трактуется, отсюда и проблема. И вообще ACCESS и дата-время это что-то с чем-то.
А c TDate вообще интересно. Из справки

TDate represents a special type of TDateTime value that has no decimal part. A TDate value represents the number of days that have elapsed since 12/30/1899.

А имеем все равно дату с временем