Section courante

A propos

Section administrative du site

CHAR

 Caractère
Turbo Pascal 1+ System

Syntaxe

identv1,identv2,...:Char;
identt2,identt2,...=Char;

Paramètres

Nom Description
identv1, identv2 Ce paramètre permet d'indiquer une variable
identt2, identt2 Ce paramètre permet d'indiquer un type de variable

Description

Ce type d'identificateur permet de définir une variable de format Char (n'importe quel caractère ASCII 0 à 255).

Exemples

Voici quelques exemples typiques de l'utilisation de ce type de données :

Essayer maintenant !
  1. Program CharSamples;
  2.  
  3. Const
  4.  A:Char = Chr(65);
  5.  Z:Char = Chr(90);
  6.  Asterix:Char = '*';
  7.  
  8. BEGIN
  9.  WriteLn(A,Asterix,Z);
  10.  WriteLn(Succ(A),Pred(Z));
  11. END.

on obtiendra le résultat suivant :

A*Z
BY

Voici quelques exemples permettant de tester la validité de nom comme la fonction isalpha du langage de programmation C :

Essayer maintenant !
  1. Program IsAlphaSamples;
  2.  
  3. Function IsAlpha(C:Char):Boolean;Assembler;ASM
  4.  XOR AL,AL
  5.  MOV CL,C
  6.  AND CL,$DF
  7.  CMP CL,'A'
  8.  JB @1
  9.  CMP CL,'Z'
  10.  JA @1
  11.  INC AL
  12. @1:
  13. END;
  14.  
  15. Function IsValidName(S:String):Boolean;
  16. Var 
  17.  I:Integer;
  18. Begin
  19.  For I := 1 to Length(S) do Begin
  20.   If(Not(IsAlpha(S[I]) or (S[I] = '-') or (S[I] = ' ')))Then Begin
  21.    IsValidName := False;
  22.    Exit;
  23.   End;
  24.  End;
  25.  IsValidName := True;
  26. End;
  27.  
  28. BEGIN
  29.  WriteLn('«Sylvain123» est un nom valide=',IsValidName('Sylvain123'));
  30.  WriteLn('«Sylvain» est un nom valide=',IsValidName('Sylvain'));
  31.  WriteLn('«Sylvain Maltais» est un nom valide=',IsValidName('Sylvain Maltais'));
  32.  WriteLn('«Sylvain II» est un nom valide=',IsValidName('Sylvain II'));
  33.  WriteLn('«Jean-Francois» est un nom valide=',IsValidName('Jean-Francois'));
  34.  WriteLn('«Jean+Francois» est un nom valide=',IsValidName('Jean+Francois'));
  35. END.

on obtiendra le résultat suivant :

«Sylvain123» est un nom valide=FALSE
«Sylvain» est un nom valide=TRUE
«Sylvain Maltais» est un nom valide=TRUE
«Sylvain II» est un nom valide=TRUE
«Jean-Francois» est un nom valide=TRUE
«Jean+Francois» est un nom valide=FALSE

Référence

Aide-mémoire de Turbo Pascal versions de 3 à 6, Edition Marabout, De Groote, Virga, 1992, ISBN: 2-501-01833-8, page 117 à 118.

Dernière mise à jour : Dimanche, le 25 janvier 2015