Calcul de l'écart entre 2 dates, resultat sous forme jj mm aa

Description

Juste un tout petit code pour calculer l'écart entre 2 dates.

Une fonction : DeltaDatetoJJMMAA(const Date1, Date2 : TDate) : TJJMMAA
ou TJJMMAA est un record qui contient, vous l'aurez deviné
JJ, MM, AA : byte

Un petit programme de test (testé sous Delphi 6) avec 2 DateTimePicker, 1 bouton et un label pour afficher le résultat.

En espèrant dépanner comme j'ai pu l'être souvent sur ce site...

Conclusion :


Encore une routine de calcul de différence entre 2 dates; mais faîtes un test avec le 29/02/2004 et le 01/03/2005, à mon avis la réponse devrait être 1 an et 1 jour, ce qui n'est pas toujours le résultat....
Alors, à mon tour


Des bugs connus? S'ils étaient connus, je me serais dépêché de les corriger avant de poster.

J'ai testée la fonction avec Delphi 6 et je crois avoir lu que c'est à partir de cette version que l'unité DateUtils est fournie.

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.