Array
(
)

Criptografia Senha BDS 2006 System.Security.Criptography

Neghetty
   - 03 abr 2007

Boa tarde

Pessoal alguém sabe como utilizar o namespace System.Security.Cripytography para criptografar campos textos como senha. Estou utilizando o tipo de arquitetura Delphi For .Net .

Minha intensão é gravar no banco o Hash da senha do usuário, porém não tenha a minima noção como gerar este hash no BDS 2006.

Obrigado

Movido de Delphi para Delphi .NET


Ara.es
   - 25 jun 2007

neghetty, tenha um rotina pronta para isso, so que não está aqui cmg, irei procura-la quando chegar em ksa e lhe mando amanha, blz?? flw !!


Ara.es
   - 26 jun 2007

Está ai a função, ele recebe um texto e gera o Hash dela usando o algoritmo MD5

#Código

function GeraHash(const Texto: String): String;
var
ue : UnicodeEncoding;
clearBytes, hashedBytes : array of Byte;
begin

ue := UnicodeEncoding.Create();
clearBytes := ue.GetBytes(Texto);
hashedBytes := (CryptoConfig.CreateFromName(´MD5´) as HashAlgorithm).ComputeHash(clearBytes);
Result := BitConverter.ToString(hashedBytes);

//Parte do codigo para retirar os ´-´ do hash.
Result := Result.Replace(´-´,System.&String.Empty);

end;


Flw, precisando e so falar... FUUIII