FOROS PROFESIONALES
WINDEV
,
WEBDEV
y
WINDEV Mobile
Inicio
|
Mensajes recientes
|
Conéctese...
|
Desconectar
|
Español
Inicio
→
Irrelevante
→
CALCULATRICE
CALCULATRICE
Iniciado por Jeancy TOUNGOU, 02,jun. 2021 09:11 - 2 respuestas
Conéctese…
Jeancy TOUNGOU
#1
Miembro registrado
1 mensaje
Publicado el 02,junio 2021 - 09:11
bonjour,
j'ai créée une calculatrice,mais je n'arrive pas à créer une touche qui peut qu'effacer ou supprimer
que le dernier chiffres.
Pouvez-vous m'aider svp?quels sont les codes sources à utiliser?
Informar
0
0
Philippe
#2
Publicado el 02,junio 2021 - 16:42
Bonjour,
Pour faire ça, j'ai créé un bouton avec un libellé "<-" sur mon pavé de calculatrice.
Sur l'évènement "Clic" des boutons,de la calculatrice, j'appelle une fonction locale qui agit selon le libellé du bouton cliqué : RemplirQuantite(MoiMême..Libellé). En l'occurrence, le CAS ">-" prend la chaine existante, supprime le dernier caractère à droite de cette chaine, puis le renvoie à la zone de saisie/affichage de la valeur prise en compte( sai_quantite). Les valeurs numériques sont transformées en chaine avant traitement, pour pouvoir utiliser la fonction Droite()
Procedure
RemplirQuantite
(
Valeur
est une chaîne
)
s
Qte
est une chaîne
=
SAI_
Quantité
r
Qte
est un réel
SELON
Valeur
CAS
","
SI
ChaîneOccurrence
(
s
Qte
,
Valeur
) >
0
ALORS RETOUR
s
Qte
=
s
Qte
+
Valeur
+
"0"
gb
VirguleSaisie
=
Vrai
CAS
"<-"
s
Qte
=
Gauche
(
s
Qte
,
Taille
(
s
Qte
)
-
1
)
CAS
"-/+"
SI
ChaîneOccurrence
(
s
Qte
,
"-"
) >
0
ALORS
s
Qte
=
Droite
(
s
Qte
,
Taille
(
s
Qte
)
-
1
)
SINON
s
Qte
=
"-"
+
s
Qte
FIN
CAS
"C"
s
Qte
=
""
AUTRES
CAS
SI
gb
VirguleSaisie
ALORS
r
Qte
=
Val
(
s
Qte
)
+
(
Val
(
Valeur
)
/
10
)
s
Qte
=
NumériqueVersChaîne
(
r
Qte
,
"5.1F"
)
gb
VirguleSaisie
=
Faux
SINON
s
Qte
=
s
Qte
+
Valeur
FIN
FIN
SAI_
Quantité
=
s
Qte
Il y a surement mieux à faire, mais ça marche...
Informar
1
0
THIERRY TILLIER
#3
Miembro registrado
1.144 mensajes
Popularité : +50 (142 votes)
Publicado el 10,junio 2021 - 17:01
Bonjour,
Uniquement pour le dernier chiffre je ferais quelque comme :
s
MaSaisie
est chaîne
=
SAI_
Monétaire
n
Taille
est un entier
=
Taille
(
s
MaSaisie
)
-
1
SAI_
Monétaire
=
s
MaSaisie
[
1
À
n
Taille
]
--
Thierry TILLIER
Développeur Windev-Webdev
Formation Windev :
https://coursdinfo.teachable.com/
Formation bureautique :
https://coursdinfo.net
Tuto WINDEV sur ma chaîne Youtube
Informar
0
0
→ Volver a Irrelevante
WINDEV 2024
WEBDEV 2024
WINDEV Mobile 2024
WINDEV (versiones precedentes)
WEBDEV (versiones precedentes)
WINDEV Mobile (versiones precedentes)
Reports & Queries
Irrelevante
Herramientas
Français
English
Español
Portuguesa
Fermer cette fenêtre
Búsqueda Tipo
Sólo temas
Todos los mensajes
Periodo Buscar
Cualquier fecha
Última hora
Última 24 horas
Última semana
Último mes
Último año
Cancelar
Vista previa del mensaje
Añadiendo una imagen
Importar una imagen desde una URL
Enviar una imagen desde un archivo de su disco
Arrastrar un archivo o click en "Examinar..."
o
Cancelar
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Texto