[aqula]

Код:

1 2 3 4 5 6 7 8 9

with ADOQuery1 do   begin     if not Active then Open;     Insert;                           FieldByName('dDate').AsDateTime:=Now-DownTimeAtNow/1440; // Ошибка неизвестного типа     FieldByName('cMessage').Value:=Trim(RichEdit1.Text); ...     Post;    end;

что здесь может быть не так?

[Alegun]

Возможно не инициализирована переменная DownTimeAtNow, может она пустая на момент вызова, попробуйте проверить

Код:

1 2 3

... Label1.Caption:= FormatDateTime('yyyymmdd', Now-DownTimeAtNow/1440); ...