Extraer n caracteres de una cadena
Hola amigos, llevo una semana con algo que parece simple a la vista pero no lo es en los resultados :)
Les cuento, tengo una conexion serie con un aparato utilizando un componente ComPort, envio una cadena y el dispositivo me contesta con una cadena como esta: :0103100003006400000000000000000000000086. Hasta aca todo bien, el codigo es el siguiente:
Str es la cadena que obtengo del dispositivo, que si la mando directamente al memo aparece correctamente y completa. Ahora solo necesito esta parte de la cadena :0103100003006400000000000000000000000086, ya que esos dos caracteres representan un numero hexadecimal, por eso en SubWord1 le agrego el $ a la cadena y en Word1 lo paso de Str a Int para que me devuelva el valor, el hex va de 00 a ff por lo tanto voy a ir de 0 a 255 en el entero. Cual es el problema? Que el copy me devuelve cualquier cosa, por momentos bien por momentos cualquier valor y no solo dos digitos puede darme 2, 4, 6 y hasta 8 digitos, eso hace que cuando lo paso a entero me da cualquier cosa. El Memo1 solo esta para ver en tiempo real que esta diciendo, la app consulta cada segundo al dispositivo. Ya les digo que cuando muestro la cadena entera en el memo se ver perfecta y la comunicacion es correcta lo que no puedo hacer es extraer correctamente esos dos caracteres. Un abrazo ! :D y gracias !!! Muchos datos ? Mucha lata? Mucho Gre Gre para decir Gregorio? No sabia como explicarlo en menos palabras :p Abrazos Javier |
Revisa si tu cadena tiene la longitud adecuada (mayor o igual a 10)...
Me llama la atención que marques en negrita los caracteres 9 y 10 y la instrucción sea Copy(Str, 10, 2); ¿No debería ser:?
Saludos. |
Cita:
Saludos... |
Cita:
Saludos. |
Prueba enviando cada paso al memo, para ver donde se produce el error:
|
Exactamente amigo, el problema es que no me esta llegando la cadena completa que especifique mas arriba en el primer post.
Hace un rato hice lo que planteas y me di cuenta de eso, pero planteare en otro post el problema del ComPort. Es un problema con el componente. Y Escafandra tienes razon, era 9,2 la posicion del copy. Pero igual no funciona porque seguramente no estoy utilizando correctamente la libreria del puerto serie. Muchísimas gracias por la ayuda, igual me sirvio para recorrerme el foro y aprenderme otras cosas !!! Un abrazo |
La franja horaria es GMT +2. Ahora son las 18:32:07. |
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