[Lotles]

MyTime:TDateTime;
MyDate:TDateTime;