UPCASE

Syntaxe

Paramètres

Description

Cette fonction permet de convertir un caractère en majuscule.

Remarque

• Seul les caractères de lettre romaine situé dans l'intervalle de A à Z, sont traités, ainsi tous les accents qu'on retrouve dans les langues comme le français, sont tous simplement ignoré par la fonction et demeure inchangé.
• La fonction LoCase n'a jamais existé en Turbo Pascal, laquelle devrait en théorie mettre en minuscule le caractère. Pour résoudre le problème, vous devrez écrire vous même une fonction permettant d'effectuer ce traitement. Vous devrez donc utiliser une fonction comme ceci :
1. Program LoCaseSamples;
2.  
3. Function LoCase(Chr:Char):Char;
4. Var
5.  ASCII:Byte Absolute Chr;
6. Begin
7.  LoCase := Char(ASCII or 32);
8. End;
9.  
10. Function StrToLower(Chaine:string):String;
11. Var
12.  I:Byte;
13. Begin
14.  For I := 1 to Length(Chaine) do Chaine[I] := LoCase(Chaine[I]);
15.  StrToLower:=Chaine;
16. End;
17.  
18. BEGIN
19.  WriteLn(StrToLower('Sylvain Maltais 1234'));
20.  WriteLn(StrToLower('SYLVain MALTais 4567'));
21.  WriteLn(StrToLower('SYLVAIN MALTAIS 90#!'));
22. END.

on obtiendra le résultat suivant :

sylvain maltais 1234
sylvain maltais 4567
sylvain maltais 90#!

Algorithme

Exemple

Voici un exemple typique de l'utilisation de cette fonction :

on obtiendra le résultat suivant :

Références

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