Section courante

A propos

Section administrative du site

Une chaine de caractères est un tableau contenant des caractères utilisables pour être mis dans une variable ou affichable dans un message. On peut indiquer un guillemet double pour délimiter le début et la fin d'une chaine de caractères. De plus, on peut lui attribuer une valeur immédiatement lors de la création de la variable (String) ou après. Voici quelques exemples de définitions de variables :

  1. Program String1;
  2.  
  3. Uses WinCrt;
  4.  
  5. Const
  6.  X:String = 'ABC';
  7.  
  8. Var
  9.  Y,Z:String;
  10.  
  11. BEGIN
  12.  Y := 'DEF';
  13.  Z := 'GHIJK';
  14.  WriteLn(X,Y,Z);
  15. END.

on obtiendra le résultat suivant :

ABCDEFGHIJK

Il peut arriver que vous ayez à mettre dans la chaine de caractères elle-même, votre caractère de délimitation, pour se faire, il faut le doublé tout simplement. Voici quelques exemples d'utilisation de simple guillemets dans la chaine de caractères :

  1. Program String2;
  2.  
  3. Uses WinCrt;
  4.  
  5. Var
  6.  Y,Z:String;
  7.  
  8. BEGIN
  9.  Y := 'L''AUTRE Y';
  10.  Z := 'L"AUTRE Z';
  11.  WriteLn('L''AUTRE X' + #13#10  + Y + #13#10  + Z);
  12. END.

on obtiendra le résultat suivant :

L'AUTRE X
L'AUTRE Y
L"AUTRE Z

Si vous souhaitez simplement ajouter une chaine de caractères après votre chaine de caractère actuel, il suffit d'utiliser l'opérateur «+». Voici quelques exemples de son utilisation :

  1. Program String3;
  2.  
  3. Uses WinCrt;
  4.  
  5. Var
  6.  Y,Z:String;
  7.  
  8. BEGIN
  9.  Y := ',' + 'DEUXIEME';
  10.  Z := 'TROISIEME' + ',' + 'QUATRIEME';
  11.  WriteLn('PREMIER',Y,',',Z);
  12. END.

on obtiendra le résultat suivant :

PREMIER,DEUXIEME,TROISIEME,QUATRIEME

Si vous souhaitez connaitre la longueur de la chaine de caractères, il faut utiliser la fonction Length. Voici quelques exemples permettant de déterminer la longueur de la chaine de caractères :

  1. Program LenSampl;
  2.  
  3. Uses WinCrt;
  4.  
  5. Var
  6.  message:String;
  7.  
  8. BEGIN
  9.  message := 'ABC';
  10.  WriteLn('LONGUEUR(''Bonjour'')=',Length('Bonjour'));
  11.  WriteLn('LONGUEUR(message)=',Length(message));
  12.  WriteLn('LONGUEUR(''Bonjour''+message)=',Length('Bonjour' + message));
  13. END.
  14.  

on obtiendra le résultat suivant :

LONGUEUR('Bonjour')=7
LONGUEUR(message)=3
LONGUEUR('Bonjour'+message)=10

Encore une fois, si vous voulez une partie seulement d'une chaine de caractères, vous devez utiliser une fonction, soit la fonction Copy. Voici quelques exemples pour extraire une partie de la chaine de caractères :

  1. Program StringSubstring;
  2.  
  3. Uses WinCrt;
  4.  
  5. Const
  6.  courriel : String = 'support@gladir.com';
  7.  
  8. BEGIN
  9.  Write('Chaine de caractères : ');
  10.  WriteLn(courriel);
  11.  If Copy(courriel,Length(courriel)-Length('gladir.com')+1,Length('gladir.com')) = 'gladir.com'Then Begin
  12.   Write('Début de la chaine de caractères : ');
  13.   WriteLn(Copy(courriel,1,Length(courriel) - Length('gladir.com') - 1));
  14.  End;
  15. END.

on obtiendra le résultat suivant :

Chaine de caractères : support@gladir.com
Début de la chaine de caractères : support


Dernière mise à jour : Dimanche, le 10 décembre 2017