Discussion :

[iks37]

Bonsoir à tous !

J'aimerais que mes programmes contrôlent les saisies. Pour moi, il y a deux types de contrôles de saisie : le contrôle quantitatif (on vérifie que la valeur saisie appartient à un intervalle fixé par le programme sinon la saisie est rejetée/refusée) et le contrôle qualitatif (on vérifie que la valeur saisie respecte le type de la variable qui doit la recevoir).

C'est le deuxième type de contrôle qui m'intéresse. J'ai établi un tableau mettant en évidence la réponse du programme relativement à deux paramètres : le type de la variable et le type de la valeur saisie par l'utilisateur.

Mes questions se devinent aisément. En effet :

1. comment obliger l'utilisateur à saisir un real ou un integer au lieu d'un string ?

2. comment obliger l'utilisateur à saisir un integer au lieu d'un real ou d'un string ?

3. comment obliger l'utilisateur à saisir effectivement une chaîne de caractères (string) qui n'est pas un nombre ? [cette question a son importance car toute suite de caractères est acceptée comme chaîne y compris les nombres].

Je souhaite que nous allions pas-à-pas, c'est-à-dire question par question. Nous pourrions commencer par la première.

[Roland Chastain]

1. comment obliger l'utilisateur à saisir un real ou un integer au lieu d'un string ?

C'est un problème classique : vous trouverez des réponses un peu partout.

Je suppose que nous parlons d'une application de type console, qui utilise la procedure ReadLn. La solution est de déclarer systématiquement une variable de type string, qu'on essaie ensuite de convertir vers le type attendu. Pour ce faire, on dispose de la procedure Val.

Si la conversion échoue, on demande à l'utilisateur de recommencer.

[iks37]

Bonsoir,

Je pense avoir compris. Je propose deux petits programmes exemples, permettant pour l'un de refuser la saisie d'un String à la place d'un Integer, et pour l'autre de refuser la saisie d'un String à la place d'un Real.

Les deux cas mettent en oeuvre la Procédure Val(s,v,c).
Qu'en pensez-vous ?

[Roland Chastain]

Voilà, c'est ça.

[iks37]

Bonsoir,

Pourrions-nous passer à la deuxième question ?

2. comment obliger l'utilisateur à saisir un integer au lieu d'un real ou d'un string ?

[Roland Chastain]

Le problème est déjà résolu.

Dans tous les cas, l'utilisateur saisit une chaîne, et ensuite la procédure Val permet de vérifier la validité de la chaîne. Le code d'erreur renvoyé par la procédure dépend du type du second argument. Si l'erreur vaut zéro, c'est que la chaîne peut être effectivement convertie vers le type spécifié.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
program UsageVal;
 
var
  s: string;
  i: integer;
  r: real;
  e: integer;
 
begin
  s := '1.5';
 
  Val(s, i, e);
  WriteLn('Conversion r'#130'ussie : ', e = 0); // FALSE
 
  Val(s, r, e);
  WriteLn('Conversion r'#130'ussie : ', e = 0); // TRUE
 
  Write('Appuyez sur la touche Entr'#130'e... ');
  ReadLn;
end.

[iks37]

Merci pour ton aide.

Je voudrais que nous passions au troisième point :

3. comment obliger l'utilisateur à saisir effectivement une chaîne de caractères (string) qui n'est pas un nombre ? [cette question a son importance car toute suite de caractères est acceptée comme chaîne y compris les nombres].

[EpiTouille]

Bonsoir,

Tu devrais lire des cours sur les chaines de caractere en pascal, tu y decouvrirais des methodes pour parcourir ces chaines et donc comment savoir si ta chaine contient que des nombre, pas de nombre, un peu de nombre ect...
Pour indince, une "String" est un tableau de caractere et donc s'itere de la meme facon qu'un tableau à l'exception pres que les premier octet est la longueure de ta chaine.

[iks37]

Bonjour,

Je suis en train de tester la procédure Str (n,s).

[EpiTouille]

3. comment obliger l'utilisateur à saisir effectivement une chaîne de caractères (string) qui n'est pas un nombre ? [cette question a son importance car toute suite de caractères est acceptée comme chaîne y compris les nombres].

Bah avec la même méthode que précedement, tu essaies de convertir ta chaine en nombre, si il n'y a pas d'erreur, c'est que ta chaine est un nombre (tu ne valides pas). Si il y a une erreur, c'est que ta chaine est valide. (oui oui, je trouve ça tordu comme raisonnement )

[ALT]

Et il y a la dernière méthode, celle qui permet de rejeter en temps réel les valeurs erronées :
Tu testes, pour chaque caractère saisi, qu'il entre dans un ensemble de caractères défini à l'avance.
Exemples : ['a'..'z','A'..'Z'], ['0'..'9'], &c.
Ainsi, tu peux rejeter le caractère fautif, l'utilisateur sait où il a fauté & il n'a pas besoin de recommencer toute la saisie (c'est quand même mieux s'il s'agit d'une longue référence).
Inutile de dire que c'est ma méthode préférée.