Encriptar datos en Delphi
 

Mi inquietud es la siguiente, estoy haciendo un programa en el cual hay una tabla usuarios y estos tienen una clave para accesar a la tabla(Usuarios) hecha en SQL.


Ejemplo:
EditUsuario
EditContrasena

Quiero saber como encriptar los datos del EditContrasena para almacenarlo en la tabla, que solo yo sepa decodificarlo.

Para comparar una contraseña, te recomiendo buscar o hacer algun algoritmo que funcione en un solo sentido, digamos que encripte pero no se pueda desencriptar. Para evaluar la contraseña, comparas el valor encruiptado de lo que ha ingresado el usuario contra lo que esta en la base de datos que ya ha sido encriptado previamente.

Por algoritmos de encriptación, te recomiendo usar las herramientas de búsqueda del foro, ya que se ha hablado en varias ocaciones del tema.

Saludos!

utilisa el operador xor
 

hla mejor no seria usar el xor para cifrar y decifrar
c=m xor k
m=c xor k
c = cifrado
m = mensaje
k = a clave

Mira este enlace de nuestro amigo Seoane:

http://delphi.jmrds.com/?q=node/44

Yo lo he utilizado y funciona de maravillas.

Saludos