Cette fonction permet de convertir une chaine de caractères ASCIZ en une heure.
Function StrToTime(const S: string): TDateTime;