!! Coversion Binario a Decimal y de Decimal codigo ascii
 

Saludos amigos tengo un gran problema, estoy elaborano un simulador de transmision de mensajes, con metodos de encriptamiento, y en uno de ellos, me toca hacer la conversion asi:

string a Ascii

h 104
o 111
l 108
a 97

y este fue el codigo que utilice:

Código Delphi [-]
for i:=1 to length(Edtmensaje.Text) do
begin
enteros[i-1]:=ord (Edtmensaje.text[i]);  //Se utiliza para string a ascci ORD
end;

Ahi esta el fragmento de codigo, y se nota claramente que utilizo el ord para este proceso, ahora necesito saber, como pasar de Decimal a Ascci, se de la instruccion chr, pero no tengo ni la mas remota idea de como implementarla, en pocas palabras necesito lo siguiente:


104 h
108 o
111 l
97 a

Por favor necesito, una ayuda urgente, gracias por su colaboracion.

Si en número tiene no es entero, puedes utilizar FormatFloat o FloatToStr y sino IntToStr.

Un Saludo.

Uso del Chr
 

Saludos, gracias, pero en si necesito algo mas especifico, en cuanto al chr, si notas que utilizo el ord para pasar de string a ascii, ahora necesito de ascci a string, si vez, eso es con el chr.

Código Delphi [-]
procedure Tfrmsimulador.BitBtn6Click(Sender: TObject);
var z: integer;
begin
for z:=1 to 8 do
begin
if x[z]= 1 then
w[z]:= power(2,z); //Aqui llenamos el vector w que lo hemos declarado float
g[z]:= chr((w[z]));//Pasar de ascci a string [aqui es el problema] me reporta un error de incompatibilidad de tipos.
end

gracias por tu tiempo prestado.

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.

Transpuesta de una matriz
 

Saludos amigos, sera que alguien me puede colaborar, con fragmentos de codigo, donde este la inversa de una matriz, de n*n, osea no se sabe su longitud....se los agradeceria en el alma....es que estoy pollo en esto de matrices y arreglos, y no he dormido por este ejercicio, o solamente ayudemen, guiemen por el buen camino, y yp seguire, gracias...:(