如何将TMemoryStream清空

我想利用一个TMemoryStream不断地从一个文件中获得数据，可是我如何将前一进的数据　啊？我用下面的代码老出错啊 我想利用一个TMemoryStream不断地从一个文件中获得数据，可是我如何将前一进的数据　啊