Criptografia Senha BDS 2006 System.Security.Criptography

Delphi

03/04/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

[color=green:05a639a16f]Movido de Delphi para Delphi .NET[/color:05a639a16f]


Neghetty

Neghetty

Curtidas 0

Respostas

Ara.es

Ara.es

03/04/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 !!


GOSTEI 0
Ara.es

Ara.es

03/04/2007

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

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


GOSTEI 0
POSTAR