Discussion :

[mickael.be]

Hello,
j'ai de gros soucis avec la fonction EncodeTime()
on ne peut pas entrer de valeurs supérieures. Exemple, 90 secondes, doit être calculé avant en 1 min 30 sec pour être encodé.

Voici ma ligne de code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
      GetDecall := 360; // Float EN SECONDES
      GetProtection := 60; // Float EN MINUTES
      // Heure de la boucle + Decallage + Minimum d'intervale.
 
DateCurrent := (DateTime + EncodeTime(trunc(GetDecall) mod 24, trunc(GetDecall) mod 60, trunc(GetProtection) mod 60, 0)) - EncodeTime(trunc(GetProtection) mod 24, trunc(GetProtection) mod 60, 0, 0);

Je dois additionner à DateTime GetDecall qui est exprimé en secondes, et GetProtection qui est en minutes.

J'ai probablement une erreur dans ma logique mod/div mais ou ?

Merci

[Cl@udius]

Hello !

Utilise plutôt les fonctions IncMinute et/ou IncSecond de DateUtils.

@+ Claudius

[mickael.be]

Je vais regarder à cela.
Si non, j'ai trouvé ceci:
http://www.delphitricks.com/source-c...as_hhmmss.html

[Cl@udius]

C'est une autre solution, puisque un TDateTime (ou TTime) est un Double.

@+

[mickael.be]

Je vais regarder, je ne connaissais pas ces fonctions.
Merci
Mick.