Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Otros temas > Trucos
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Los mejores trucos

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 10-01-2018
(MAJ) (MAJ) is offline
Miembro
 
Registrado: abr 2007
Posts: 71
Poder: 17
(MAJ) Va por buen camino
Arrow 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

Última edición por (MAJ) fecha: 10-01-2018 a las 05:55:14.
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Calcular hash sha1 y md5 seoane Trucos 5 27-01-2010 04:32:34
codigo hash maco2007 Varios 4 20-10-2007 18:01:04
Calcular hash md5 Lepe Trucos 1 10-05-2007 16:11:58
Hash RaulChemical Varios 1 07-09-2004 21:10:11
¿Hash or not Hash? hgiacobone Varios 5 17-07-2003 20:43:26


La franja horaria es GMT +2. Ahora son las 18:07:42.


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
Copyright 1996-2007 Club Delphi