Cette fonction permet la conversion de l'objet de date et heure en une chaine de caractères.
Function DateTimeToStr(DateTime:TDateTime):String;