Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   MD5 de un Stream. (https://www.clubdelphi.com/foros/showthread.php?t=48735)

JXJ 03-10-2007 00:00:57

MD5 de un Stream.
 
Hola. pues aca con la duda. de que no se
como obtener el md5 de un TmemoryStream.
o de un TFileStream.
No se como usar los componentes.
se me han complicado el uso de los sdean y de los DcpCrypt2.


Segun me parece es la mejor forma, de verificar si el archivo
que ya ha sido descargado, es o no el mismo que ya existe
asi me ahorro y evito volvelo a procesar.

vale gracias. :D

seoane 03-10-2007 00:08:24

Aquí tienes como calcular el md5 y además el sha1 de regalo :D:
http://delphi.jmrds.com/?q=node/36

Por cierto recuerda "rebobinar" el stream antes de calcular su md5:
Código Delphi [-]
  TuStream.Position:= 0;
  ShowMessage(CalcHash(TuStream,haMd5));

rastafarey 03-10-2007 00:09:49

Resp
 
Lees el memorystream (Ms)
A un cadena le asignar ellargo en byte del meeory stream(S)

setlength(S, Ms.size);
ms.writebuffer(S[0], Ms.size)
asi compias el contenido del memorystream en una cadena y ala caden le sacas el md5.

Si algun nombre de funcion esta mal escrito es por que tebgo delphi a la mano.

JXJ 03-10-2007 18:52:40

Gracias

[seoane]

rastafarey
ahora los pruebo.


La franja horaria es GMT +2. Ahora son las 21:56:12.

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