[jcapitan]

Hola amigos buenas tardes, pase de una versión muy anterior de delphi a la versión de alejandría, usaba unas unidades que obtuve indagando en la web sobre encriptación, pero al usarlas en Alejadría me topé con problemas, encripta muy bien pero no a la inversa, es decir desencriptar. Noté que los textos con longitud de 17 a 32, de 65 a 80, ... no tiene problemas, si alguien puede localizar el porqué de este comportamiento de la rutina se lo agradeceré. Gracias. Les dejo los archivos con ejemplo.

Son archivos AES.pas, Mime.pas, Encrypt.pas y el código principal para usar esas unidades.

Coloquen texto menor a 17 de longitud y brincará el error, coloquen texto entre 33 y 64 de longitud y brincará el error......

Gracias.!!