Modificar un str dígito a dígito
Hola a todos:
Lo primero es decir que no se si este post debería estar aquí o en el de varios, bueno, los moderadores decidirán. Trabajo con D5 en WXP y el problema es el siguiente: Lo que quiero hacer es modificar un string que me llega haciendo una serie de operaciones matemáticas a cada dígito (el string que me llega es un string compuesto por 10 digitos enteros). Para ello puedo acceder a cada uno de los digitos como: mistring[i] y puedo modificarlos haciendo unentero := strtoint(mistring[i])+1 (por poner un ejemplo) el problema me surge cuando los resultados obtenidos los quiero meter de nuevo en el string stringresultado[i] := inttostr(unentero); me dice que char y string no son tipos compatibles ¿como puedo hacerlo entonces? Gracias por vuestra atención. |
stringresultado[i] := inttostr(unentero)[1];
// Saludos |
Creo q te puede interesar la funcion StuffString..
|
Hola
Otra forma : stringresultado[i] := chr(unentero + 48); (El 48 es el código ascii del carácter '0') Saludos. |
Muchas gracias a todos, lo voy a probar ahora mismo, a propósito marc, ¿sabes de algún sitio donde estén listados los códigos ascii de todos los caracteres y número?.
Gracias |
Muchas gracias a todos, lo voy a probar ahora mismo, a propósito marc, ¿sabes de algún sitio donde estén listados los códigos ascii de todos los caracteres y número?.
Gracias |
Ya he probado las soluciones de Roman y Marc, funcionan perfectamente ambas, muchas gracias.
Delphino, la función que me dices no la encuentro por ninguna parte, ni en la ayuda de delphi, ni en la de windows. ¿me puedes decir donde encontrarla?. Un saludo |
Hola.
No he encontrado la tabla ASCII en la ayuda de Delphi. Como es muy común la podrás encontrar buscando por Internet. Si quieres puedes consultarla por encima, mediante el Mapa de carácteres de Windows (en Accesorios, Herramientas del sistema). Simplemente ponte encima del carácter deseado y te dirá su código Ascii (en Hexadecimal, puedes convertirlo al decimal mediante la calculadora). Saludos. |
Gracias Marc, con eso me vale. Ahora que lo dices había encontrado una tabla y me había liado.
|
|
esa funcion se encuentra el unidad StrUtils y no se si solo en Delphi7 q tengo, es muy potente y permite quitar una substring de una string y sustituirla con otra especificando donde se empieza la sustitucion y cuantos caracteres toma..
|
Gracias, delphino y Tomás. Delphino, yo trabajo con D5 y no he encontrado tal función.
|
La franja horaria es GMT +2. Ahora son las 03:24:27. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi