for Stream.Position := 0 to Stream.Size-1 do ...

っていう使い方が出来ると便利なのに。