Begin
AddToDebug('DateTimeToStr(Now): '+DateTimeToStr(Now));
AddToDebug('DateTimeToStr(Date): '+DateTimeToStr(Date));
AddToDebug('DateTimeToStr(Time): '+DateTimeToStr(Time));

AddToDebug('DateToStr(Now): '+DateToStr(Now));
AddToDebug('DateToStr(Date): '+DateToStr(Date));
AddToDebug('DateToStr(Time): '+DateToStr(Time));

AddToDebug('TimeToStr(Now): '+TimeToStr(Now));
AddToDebug('TimeToStr(Date): '+TimeToStr(Date));
AddToDebug('TimeToStr(Time): '+TimeToStr(Time));

end.