Cette fonction permet la conversion de l'objet de date en une chaine de caractères.
Function DateToStr(Date: TDateTime): string;