Hola, BuRtOn.
La cosa es muy simple.
Siendo Arreglo el lugar donde tengo mis números...
Código Delphi
[-]
var Arreglo:array[1..MaxArreglo] of integer.
Ind:integer;
begin
edtMensaje.Text:='';
for Ind:=1 to MaxArreglo do edtMensaje.Text:=edtMEnsaje.Text+Char(Arreglo[Ind]);
End;
Espero te sirva. Saludongos.