bonjour,

je recherche comment convertir un code ASCII dans une chaine en entier...

exemple
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
program testval;
var     a,c         :string;
        i,r,code  :integer;
begin
        a:='Bonjour';
        c:=copy(a,1,1);
        val(c,r,code);
        Writeln('a= ',a,' c= ',c,' r= ', r,' cr= ',code);
        readln;
end.
je pensais que val allait me le faire mais ça et que j'allais récuperer 66 dans R mais je n'ai que zero et 1 en cr

merci si vous avez une autre solution