Estimado AL, gracias por contestar. Pues te comento que esta unidad no tengo idea quien la halla creado, no se si la persona que la subió aquí al foro es su creador, pero como casi todo lo que es código abierto, pues es casi imposible obtener soporte técnico. Ahora bien, se me ocurrio "ver" lo que contenía cada una de las variables en sus distintos procesos, y esto fue lo que obtuve al codificar a base64 lo que contenia en memoria las variables, y esto fue lo que obtuve.
delphi 2007
Cita:
inbuf array de char
base64 de inbuf despues de StrPCopy(inbuf,cadena):
fHwzLjJ8MjAxNC0wNy0wNFQxODozNToyMXxpbmdyZXNvfFBBR08gRU4gVU5BIFNPTEEgRVhISUJJQ0lPTnwzOC43OXwxLjAwfE1Y Tnw0NS4wMHxFRkVDVElWT3xWSUxMQUhFUk1PU0EgVEFCQVNDT3xDVUFFNzExMTE4VU05fEVEV0lOIEFMRVhJUyBERSBMQSBDUlVa IEFTQ0VOQ0lPfEVESUZJQ0lPIDV8MjAxLUF8Q09MLiBGT1ZJU1NTVEUgMnxWSUxMQUhFUk1PU0F8Q0VOVFJPfFRBQkFTQ098TcOJ WElDT3w4NjE3MHxFRElGSUNJTyA1fDIwMS1BfENPTC4gRk9WSVNTU1RFIDJ8VklMTEFIRVJNT1NBfENFTlRST3xUQUJBU0NPfE1F WElDT3w4NjE3MHxQRVJTT05BIEZJU0lDQSBDT04gQUNUSVZJREFEIEVNUFJFU0FSSUFMfFhBWFgwMTAxMDEwMDB8VkVOVEEgQUwg UFVCTElDT3xBVi4gR1JFR09SSU8gTUVOREVaIE1BR0HDkUF8IzQwMjN8Q09MLiBUQU1VTFRFIERFIExBUyBCQVJSQU5DQVN8VklM TEFIRVJNT1NBfENFTlRST3xUQUJBU0NPfE1FWElDT3w4NjE1MHwxLjAwfFBaQS58TElKQSBBR1VBICMxMDB8TElKQSBERSBBR1VB ICMgMTAwfDguNjJ8OC42MnwxLjAwfFBpZXphfEIuQ0FMWk9NSU5BLjR8QlJPQ0hBIENBTFpPTUlOQSA0IiBQRVJGRUNUfDMwLjE3 fDMwLjE3fElWQXwxNi4wMHw2LjIxfDYuMjF8fAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
Delphi XE2
Cita:
inbuf array de AnsiChar, ya que si se deja como char, delphi xe2 lo toma como WideChar.
base64 de inbuf despues de StrPCopy(inbuf,cadena):
fHwzLjJ8MjAxNC0wNy0wNFQxODozNToyMXxpbmdyZXNvfFBBR08gRU4gVU5BIFNPTEEgRVhISUJJQ0lPTnwzOC43OXwxLjAwfE1Y Tnw0NS4wMHxFRkVDVElWT3xWSUxMQUhFUk1PU0EgVEFCQVNDT3xDVUFFNzExMTE4VU05fEVEV0lOIEFMRVhJUyBERSBMQSBDUlVa IEFTQ0VOQ0lPfEVESUZJQ0lPIDV8MjAxLUF8Q09MLiBGT1ZJU1NTVEUgMnxWSUxMQUhFUk1PU0F8Q0VOVFJPfFRBQkFTQ098TclY SUNPfDg2MTcwfEVESUZJQ0lPIDV8MjAxLUF8Q09MLiBGT1ZJU1NTVEUgMnxWSUxMQUhFUk1PU0F8Q0VOVFJPfFRBQkFTQ098TUVY SUNPfDg2MTcwfFBFUlNPTkEgRklTSUNBIENPTiBBQ1RJVklEQUQgRU1QUkVTQVJJQUx8WEFYWDAxMDEwMTAwMHxWRU5UQSBBTCBQ VUJMSUNPfEFWLiBHUkVHT1JJTyBNRU5ERVogTUFHQdFBfCM0MDIzfENPTC4gVEFNVUxURSBERSBMQVMgQkFSUkFOQ0FTfFZJTExB SEVSTU9TQXxDRU5UUk98VEFCQVNDT3xNRVhJQ098ODYxNTB8MS4wMHxQWkEufExJSkEgQUdVQSAjMTAwfExJSkEgREUgQUdVQSAj IDEwMHw4LjYyfDguNjJ8MS4wMHxQaWV6YXxCLkNBTFpPTUlOQS40fEJST0NIQSBDQUxaT01JTkEgNCIgUEVSRkVDVHwzMC4xN3wz MC4xN3xJVkF8MTYuMDB8Ni4yMXw2LjIxfHwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
Al principio las cadenas que nos devuelve la codificacion base64 coinciden, hasta aproximadamente la tercera linea justo antes del final donde estan los caracteres PfFRBQkFTQ098Tc. A partir de alli ya cambia, por lo tanto todos los siguientes procesos ya no generan el resultado deseado.
Alguna sugerencia? gracias