Cette procédure permet la conversion de l'objet de date et heure en format de date système.
Procedure DateTimeToSystemTime(DateTime: TDateTime;Var SystemTime: TSystemTime);