Discussion :

[grigri]

Je voudrais savoir s'il est possible avec la fonction Val d'obtenir l'équivalent d'un nombre en lettres avec le code ascii

ex: pour 6566 on obtient AB

Si ce n'est pas possible, comment pourrais-je faire ???

[M.Dlb]

Il faut utiliser la fonction chr()

[grigri]

oui mais si je mets Chr 6566 il ne pourra pas me donner AB de suite ?

[Alcatîz]

Bonjour !

Si tu fais

Code :

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

Chaine := Chr(65) + Chr(66);

Tu obtiendras bien AB.

[Eric Sigoillot]

Tu peux créer une fonction une fonction pour ça, ce n'est pas compliqué :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
function ChrWDec(Code: Word): String;
var
  Result: String[2];
begin
  Result[0] := #2;
  Result[1] := Chr(Code div 100);
  Result[2] := Chr(Code mod 100);
end;
 
 
begin
  { Affiche 'AB' }
  WriteLn(ChrWDec(6566));
end.