Cita:
Empezado por YosvanyRL
Cambie el siguiente codigo de la funcion
Código Delphi [-]
function cifrarTexto (Str, Clave : String) : String;
por
Código Delphi [-]
function cifrarTexto (Str, Clave : AnsiString) : AnsiString;
y ahora me sale ??????????????????????????? en vez de las letras chinas
Please, que es ese fantasma chino que me atormenta? |
Es que no vale con cambiar el tipo de los parámetros de la función. Por dentro está utilizando unos objetos (que en principio no sé cuales son) que estarán esperando el tipo en el que se programaron originalmente. Me explico, ahora la función "Length" devuelve valores distintos si se trata de un string o de un ansistring, ya que los string hasta Delphi 2009 eran los de siempre, mientras que ahora el tipo string equivale al antiguo "WideString". A lo mejor tienes que hacer un "cast" en alguna otra llamada dentro de la función, según lo vayas necesitando.
Cuando tenga un momento le echo un vistazo.
otra opción es que busques los componentes actualizados a la versión que estés utilizando en este momento, que seguro que tienen corregidas estas diferencias
Nota: Casimiro, el Unicode se añadió a Delphi 2009, que fue el gran cambio de dicha versión.
Un saludo