[[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));