Bonsoir,
je cherche à convertir une valeur en minute vers un tdatetime, je fais :
J'ai une erreur econverterror dans le encodedate avec le message "0-0-25 is not a valid date specification", pourquoi cette erreur pour moi cette valeur peut aller de 0 à 31 non ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 var min , h, jours, mois: integer; min := 36745 mod 60; h := 36745 div 60; jours := h div 24; if jours > 0 then begin h := h mod 24; mois := jours div 30; if mois > 0 then jours := jours mod 30; end; //composedatetime(date_debut.Date,heure_encode); date_alarme := composedatetime(encodedate(0,mois,jours),encodetime(h,min,0,0));
Merci
David
ps : j'initialise mes variables à 0 au départ
Partager