PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV, WEBDEV e WINDEV Mobile

Inicio | Mensagens recentes | Conecte-se... |  | Português FR
Inicio → WEBDEV 2024 → Saisir une heure supérieur à 24
Saisir une heure supérieur à 24
Iniciado por Christophe, jun., 24 2022 11:42 PM - 2 respostas
#1
Publicado em junho, 24 2022 - 11:42 PM
Bonjour,

Pour un besoin spécifique, j'ai besoin de saisir un temps au format HH:MM . Seulement, mon client souhaite pouvoir saisir une heure supérieur à 24. Par exemple 42h30.
Seulement, je suis bloqué avec le masque de saisie de webdev (à mon avis, même problème avec windev).

Avez vous une idée pour gérer ce cas? Je tourne en rond depuis un petit moment...

Merci à vous !
#2
Membro registado
87 mensagems
Popularité : +3 (3 votes)
Publicado em junho, 25 2022 - 3:48 PM
Bonjour

J'ai fait l'essai avec les expressions régulières et c'est toujours aussi compliqué... Donc méthode plus simple : un champ texte avec

dans l'init du champ :
MoiMême..MasqueSaisie="99:99"
MoiMême="00:00"

et en sortie du champ
SI Position(MoiMême,":")<1 _OU_ PAS 0<=Val(ExtraitChaîne(MoiMême,2,":"))<60 ALORS
ToastAffiche("L'heure n'est pas valide",toastCourt, cvMilieu, chCentre, RougePastel);RepriseSaisie(MoiMême)
SINON //formater l'heure correctement, ex : 15:5 devient 15:05
nHeures est un entier = Val(ExtraitChaîne(MoiMême,1,":"))
nMinutes est un entier = Val(ExtraitChaîne(MoiMême,2,":"))
MoiMême=NumériqueVersChaîne(nHeures,"02d")+":"+NumériqueVersChaîne(nMinutes,"02d")
FIN

Seule restriction : il faut saisir un 0 devant si le nombre d'heures est <10 car le : n'est pas saisissable (il apparaît automatiquement après 2 chiffres).

--
Bon dev.

Patrick Lalemand
https://www.lapalys.ca
#3
Publicado em junho, 27 2022 - 9:07 AM
Bonjour Patrick,

Merci d'avoir pris le temps de me répondre.

Je vais essayer ta méthode.

Bonne journée !

Christophe
→ Voltar para WEBDEV 2024