DateHeureDifférence (Fonction) En anglais : DateTimeDifference
// Temps écoulé depuis le 01/01/1998 à 12h15
Diff est une chaîne
Diff = DateHeureDifférence("199801011215", DateSys() + HeureSys())
// Affichage temps écoulé
Info("Temps écoulé : " + RC + ...
Gauche(Diff, 8) + "jours" + RC + ...
Milieu(Diff, 9, 2) + "heures" + RC + ...
Milieu(Diff, 11, 2) + "minutes" + RC + ...
Milieu(Diff, 13, 2) + "secondes" + RC + ...
Milieu(Diff, 15, 2) + "centièmes de seconde")
// Temps écoulé depuis le 01/01/1998 à 12h15
Diff est une chaîne
Diff = DateHeureDifférence("199801011215", DateHeureSys())
// Affichage temps écoulé
Info("Temps écoulé : " + RC + ...
Gauche(Diff, 8) + "jours" + RC + ...
Milieu(Diff, 9, 2) + "heures" + RC + ...
Milieu(Diff, 11, 2) + "minutes" + RC + ...
Milieu(Diff, 13, 2) + "secondes" + RC + ...
Milieu(Diff, 15, 2) + "centièmes de seconde")
// Pour remplir une durée à partir du résultat de DateHeureDifférence
Diff est une chaîne = DateHeureDifférence("199801011215", DateSys() + HeureSys())
// convertir la différence dans une variable de type durée
Durée1 est une Durée = ChaîneVersDurée(Diff, duréeCentième)
// --------------------------------------------
// Autre solution possible
// DateHeure1 est une DateHeure = "199801011215"
// DateHeure2 est une DateHeure = DateSys() + HeureSys()
// Durée1 est une durée = DateHeure2 - DateHeure1
// ----------------------------------------------
// Affichage temps écoulé
Info("Temps écoulé : " + Durée1..Jour + "jours" + RC + ...
Durée1..Heure + "heures" + RC + ...
Durée1..Minute + "minutes" + RC + ...
Durée1..Seconde + "secondes" + RC + ...
Durée1..Milliseconde + "millièmes de seconde")
// Pour remplir une durée à partir du résultat de DateHeureDifférence
Diff est une chaîne = DateHeureDifférence("199801011215", DateHeureSys())
// convertir la différence dans une variable de type durée
Durée1 est une Durée = ChaîneVersDurée(Diff, duréeCentième)
// --------------------------------------------
// Autre solution possible
// DateHeure1 est une DateHeure = "199801011215"
// DateHeure2 est une DateHeure = DateHeureSys()
// Durée1 est une durée = DateHeure2 - DateHeure1
// ----------------------------------------------
// Affichage temps écoulé
Info("Temps écoulé : " + Durée1..Jour + "jours" + RC + ...
Durée1..Heure + "heures" + RC + ...
Durée1..Minute + "minutes" + RC + ...
Durée1..Seconde + "secondes" + RC + ...
Durée1..Milliseconde + "millièmes de seconde")
Syntaxe
<Résultat> = DateHeureDifférence(<Date/Heure de début> , <Date/Heure de fin>)
<Résultat> : Chaîne de caractères Nombre de jours, heures, minutes, secondes écoulés entre deux dates au format +/-JJJJJJJHHMMSSCC où :- JJJJJJJ est le nombre de jours écoulés entre les deux "Date - Heure" indiquées,
- HH est le nombre d'heures,
- MM est le nombre de minutes,
- SS est le nombre de secondes,
- CC est le nombre de centièmes de seconde.
Ce résultat est issu de l'opération : <Date/Heure de fin> - <Date/Heure de début>. Le résultat est négatif si la <Date/Heure de début> est postérieure à la <Date/Heure de fin>. Attention : Pour affecter ce résultat à une variable de type Durée, il est nécessaire d'utiliser la fonction ChaîneVersDurée avec la constante duréeCentième. <Date/Heure de début> : Chaîne de caractères ou variable de type DateHeure Date/Heure de début du calcul au format :- AAAAMMJJHHMMSSCC
- AAAAMMJJHHMMSS
- AAAAMMJJHHMM
- AAAAMMJJHH
<Date/Heure de fin> : Chaîne de caractères ou variable de type DateHeure Date/Heure de fin du calcul au format :- AAAAMMJJHHMMSSCC
- AAAAMMJJHHMMSS
- AAAAMMJJHHMM
- AAAAMMJJHH
Remarques La validité des dates et des heures passées en paramètre est vérifiée. Un message est affiché en cas de date ou d'heure invalide. Une "Date - Heure" est considérée invalide si : - La date est invalide. La validité de la date peut être vérifiée avec la fonction DateValide.
- L'heure est invalide. La validité de l'heure peut être vérifiée avec la fonction HeureValide.
Il n'est pas possible d'effectuer des différences de dates antérieures au 14 octobre 1582 (le passage du calendrier Julien au calendrier grégorien ne sera pas pris en compte). Le format de stockage des dates permet de stocker des dates comprises entre le 01/01/0001 et le 31/12/9999. Composante : wd240std.dll
Documentation également disponible pour…
|
|
|
| |
| Video DateHeureDifférence |
|
| https://youtu.be/c-Ih6WpX4Ws
https://windevdesenvolvimento.blogspot.com/2019/05/dicas-2106-windev-webdev-mobile-data-29.html
// EDT_BTN_cALCULAR_DIAS
diferencia is string = DateTimeDifference(EDT_DATA_INICIAL_1, EDT_DATA_FINAL_1)
duracao is Duration=StringToDuration(diferencia, durationCenti)
EDT_dias_1=duracao..Day |
|
|
|
| |
| |
| |
| |
| |
| |
| | |
|