MD5 de un Stream.

[JXJ]

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.

[[seoane]]

Aquí tienes como calcular el md5 y además el sha1 de regalo :
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]

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]

Gracias

[seoane]

rastafarey ahora los pruebo.