I need to perform a Hash of data stored at a TMemoryStream... But unfortunately, the following program spits out different results if i run it in sucession... Note that the file being read (test6.pas) never changes.
Uses Classes, SHA1; Var Data : TMemoryStream; Hash : TSHA1Digest; Begin Data := TMemoryStream.Create; Data.LoadFromFile('test6.pas'); Hash := SHA1Buffer(Data.Memory, Data.Size); WriteLn(SHA1Print(Hash)); Data.Free; End. Am i doing (probably) anything wrong ? Thanks in advance. _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal