Set the value for key parameter as TDateTime
class procedure setValue(key: string; Value: TDateTime)