Salut!
Comment ajouter 1 minute à un variable TDateTime, je m'explique:
on a
var Time: TDateTime;
par exemple Time: 11:58:00,
avant pour ajouter 1 minute à Time je faisais:
decodetime(Time,H,M,S,MS);
encodetime(H,M+1,S,MS); et on a 11:59:00
mais le problème c'est que si on veut encore ajouter 1 min à 11:59:00
par la même méthode il y une erreur car la méthode ajoutera 1 à 59
et on aura 11:60:00 au lieu de 12:00:00
Est cce qu'il ya un autre moyen pour faire cet incrémentation de 1 minute
sans qu'on ait cette erreur.
Merci de vos réponses
Partager