Source position: tiObject.pas line 290
protected procedure TtiFieldDateTime.SetAsDateTime(
const AValue: TDateTime
); override;