TStream.CopyFrom verändert Quellstream?!

[xineohp]

hi,

Ich beschäftige mich gerade zum ersten Mal mit Streams. Dabei tritt gerade folgendes Problem auf:
die Funktion function TStream.CopyFrom(Source: TStream; Count: Int64): Int64; scheint den Quell Stream zu veränderen?!

1. Ich lade eine Datei mit FStream.LoadFromFile(Filename) in einen tMemoryStream.
2. Dann kopiere ich den Stream mit FStream2.CopyFrom(FStream, FStream.Size) in einen zweiten Stream.
3. Zu guter Letzt bilde ich dann mit dem DEC den MD4-Hash über den ersten Stream.

Wenn ich jetzt den zweiten Schritt weglasse/auskommentiere verändert sich die Hashsumme, wie kann das sein?