Ver Mensaje Individual
  #4  
Antiguo 02-08-2006
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 29
Lepe Va por buen camino
Creo que estas intentando encontrar una solución sin comprender como llegar a ella.

Tienes Chr y Ord para traducir una letra a su equivalente Ascii y viceversa.

Si el código ascii de cada letra, lo tienes en una cadena separada por espacios, sólo es cuestión de analizar esa cadena.

Código Delphi [-]
var ascii : string;
     ValorNumerico : integer;
     letraFinal : Char;
begin
  ascii := '105'; // representación de la letra "i" en ascii
  valornumerico := strtoint(ascii); 
  letrafinal := chr(valornumerico);

// o resumiendo:
letrafinal := chr(strtoint(ascii));
end;

PD: El segundo código no funciona bien, ya que el bucle for empieza en cero, y un String siempre empieza en el índice uno. Intentalo con la cadena "Bien" y verás que en el ShowMessage obtienes 5 valores ascii, cuando solo hay 4 letras. Eso demuestra que no has analizado bien el código

Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.

Última edición por Lepe fecha: 02-08-2006 a las 14:47:05.
Responder Con Cita