Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Trucos (https://www.clubdelphi.com/foros/forumdisplay.php?f=52)
-   -   calcular hash (https://www.clubdelphi.com/foros/showthread.php?t=92718)

(MAJ) 10-01-2018 05:49:16

calcular hash
 
He visto que por la red no hay un metodo simple para calcular el hash de una cadena o un archivo asi que aqui dejo mi pequeño grano de arena al asunto

Código Delphi [-]
uses 
system.hash; 

function calcularHash(const mensaje,key:string;version:TSHA2version):string;
var   
  hash:THashSHA2; 
begin
      result:=thash.DigestAsString(hash.GetHMACAsBytes(mensaje,skey,SHA256));
end;

en el ejemplo de arriba la funcion devuelve el hash SHA256 de una cadena y su key y la version puede ser: SHA224, SHA256, SHA384, SHA512, SHA512_224, SHA512_256.

en realidad no es solo calcula SHA2. Aqui tienen la documentacion de la libreria que al parecer es poco conocida, pero muy util para el proposito
Espero que a alguien le sirva. Saludos

p/d: La libreria fue probada solamente en Delphi 10 Seattle, no puedo asegurar en que versiones este incluida

ElKurgan 11-01-2018 10:28:33

Gracias por el aporte

Saludos

Neftali [Germán.Estévez] 11-01-2018 11:06:55

Se agradece. ^\||/

WHILENOTEOF 11-01-2018 11:20:04

La verdad que quien se ha quedado en versiones antiguas de Delphi (digamos Delphi 7 :D), se encuentra con cantidad de clases que ya vienen implementadas en el propio Delphi. Gracias.

ElKurgan 11-01-2018 11:54:04

Creo que esta librería se incluyó por primera vez en Delphi XE8

Saludos

ecfisa 11-01-2018 12:45:21

Lo dicho anteriormente, muchas gracias ^\||/

Saludos :)

esublim 26-02-2023 02:28:45

podrias poner el ejemplo para desencriptarla


La franja horaria es GMT +2. Ahora son las 22:28:56.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi