char en string

ma variable X est un char, mon tableau est un string.
Le programme va lire les octets jusqu'a ce qu'il trouve un entier.
Est-il possible de convertir le X(char) en string(tableau)? a moins qu'un tableau string accepte une valeur char?

Code:

---

1 2 3 4 5 6 7

X:='A'; While not( X in ['0','1','2','3','4','5','6','7','8','9']) do begin X:=char(readbyte); end; tableau[1]:=(X);

---

Bonjour.
Une string est un ensemble de Char.

To code :

Code:

---

1 2 3 4 5 6 7

X:='A'; While not( X in ['0','1','2','3','4','5','6','7','8','9']) do begin X:=char(readbyte); end; tableau[1]:=(X);

---

Le code est correcte, mais...
Plus simple :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

var X : Char;   begin X:='A'; While not( X in ['0'..'9']) do begin X:=char(readbyte); end; tableau[1]:=(X);

---

A +