Gérer une saisie multiple de valeurs (numériques)

Voici un exemple de saisie consécutive de valeurs numériques (testées), avec possibilité d'annuler (refuser) la poursuite de l'exécution à chaque saisie.

Article lu   fois.

L'auteur

Site personnel

Liens sociaux

Viadeo Twitter Facebook Share on Google+   

Produit : 4D 2003 & 4D 2004  ·  Plateforme : Windows & Mac

C_TEXTE($vt_choix)
C_BOOLEEN($vb_Confirmation)
C_ENTIER LONG($vl_Valeur1;$vl_Valeur2)

Si (($vl_Valeur1=0) & ($vl_Valeur2=0))   ` non initialisées ?
      $vl_Valeur1:=20   ` fixer une valeur par défaut pour $vl_Valeur1
      $vl_Valeur2:=100   ` fixer une valeur par défaut pour $vl_Valeur2
Fin de si

   $vb_Confirmation:=Faux
CONFIRMER("première valeur : "+Chaine($vl_Valeur1)+", deuxième valeur :"+Chaine($vl_Valeur2))
Si (OK=1)
      $vb_Confirmation:=Vrai

Sinon   ` demander à l'utilisateur de saisir ou confirmer les deux valeurs
         ` Si l'utilisateur annule un des dialogues, on sort de cette répétition.
         ` Si l'utilisateur ne saisit pas un chiffre, les dialogues seront rappelés.

Repeter
         $vt_choix:=Demander("première valeur : ";Chaine($vl_Valeur1))
Si (OK=1)
Si ((Num($vt_choix)#0) | ($vt_choix="0"))   ` valeur numérique saisie
               $vl_Valeur1:=Num($vt_choix)
               $vt_choix:=Demander("deuxième valeur : ";Chaine($vl_Valeur2))
Si (OK=1)
Si ((Num($vt_choix)#0) | ($vt_choix="0"))   ` valeur numérique saisie
                     $vl_Valeur2:=Num($vt_choix)
                     $vb_Confirmation:=Vrai
Fin de si
Fin de si
Fin de si
Fin de si
Jusque (($vb_Confirmation) | (OK=0))

ALERTE("première valeur : "+Chaine($vl_Valeur1)+", deuxième valeur :"+Chaine($vl_Valeur2))

Fin de si

Si ($vb_Confirmation)
` Les deux valeurs numériques ont été validées par l'utilisateur
Sinon
` Les valeurs par défaut n'ont pas été validées.
Fin de si

Vous avez aimé ce tutoriel ? Alors partagez-le en cliquant sur les boutons suivants : Viadeo Twitter Facebook Share on Google+   

  

Copyright © 2006 4D s.a.. Aucune reproduction, même partielle, ne peut être faite de ce site ni de l'ensemble de son contenu : textes, documents, images, etc. sans l'autorisation expresse de l'auteur. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts.