prirazeni jako string ulozi casovou znamku, ale bez milisekund, resp. milisekundy jsou 0:
FieldByName('HeartBeat').AsString:=FormatDateTime('DD.MM.YYYY hh:nn:ss.zzz', now)
pokud zkusim jako Variant:
var v: variant;
v:= variant(formatdatetime('dd.mm.yyyy hh:nn:ss.zzz',now));
FieldByName('HeartBeat').AsVariant:=v;
pak vyjimka: EVariantTypeCastError with message'Could not convert variant of type (UnicodeString) into type (Date)'.