Section courante

A propos

Section administrative du site

VAL

Valeur
Delphi/Kylix/Lazarus System

Syntaxe

Procedure Val(ch:String; Var nbre;Var err:Integer);

Paramètres

Nom Description
ch Ce paramètre permet d'indiquer la chaine de caractères contenant le nombre encodé en alphanumérique.
nbre Ce paramètre retourner le nombre.
err Ce paramètre retourner l'erreur.

Description

Cette procédure permet de convertir une chaine de caractères en sa valeur numérique.

Exemple

Voici quelques exemples typiques de l'utilisation de cette fonction :

  1. Program ValSamples;
  2.  
  3. {$APPTYPE CONSOLE}
  4. Uses SysUtils;
  5.  
  6. Var
  7.  N,Err:Integer;
  8.  R:Real;
  9.  
  10. BEGIN
  11.  Val('0',N,Err);
  12.  WriteLn('Val(0) = ',N,', Erreur=',Err);
  13.  Val('123',N,Err);
  14.  WriteLn('Val(123) = ',N,', Erreur=',Err);
  15.  Val('-123',N,Err);
  16.  WriteLn('Val(-123) = ',N,', Erreur=',Err);
  17.  Val('123E',N,Err);
  18.  WriteLn('Val(123E) = ',N,', Erreur=',Err);
  19.  Val('-123E',N,Err);
  20.  WriteLn('Val(-123E) = ',N,', Erreur=',Err);
  21.  Val('-123G',N,Err);
  22.  WriteLn('Val(-123G) = ',N,', Erreur=',Err);
  23.  Val('G',N,Err);
  24.  WriteLn('Val(G) = ',N,', Erreur=',Err);
  25.  Val('123.45',R,Err);
  26.  WriteLn('Val(123.45) = ',R:3:2,', Erreur=',Err);
  27. END.

on obtiendra le résultat suivant :

Val(0) = 0, Erreur=0
Val(123) = 123, Erreur=0
Val(-123) = -123, Erreur=0
Val(123E) = 123, Erreur=4
Val(-123E) = 123, Erreur=5
Val(-123G) = 123, Erreur=5
Val(G) = 0, Erreur=1
Val(123.45) = 123.45, Erreur=0

Voir également

Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Chr
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - IntToStr
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Str
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - StrToInt
Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - VAL
Langage de programmation - Turbo Pascal pour Windows - Référence de procédures et fonctions - VAL

Dernière mise à jour : Mercredi, le 18 février 2015