为何重新读入流会报地址错误？？急！

声明 
 TTextAD = Record
    ID : Integer;
    Content  : string;
    Orientation  : Byte;
    Pace : Byte;
    Play : Integer;
    FontType : string;
    FontSize : Integer;
    ImgContent : TStream;
    ImgLocation : Byte;
  end; GTextAD: array of TTextAD;
 ms : TStream;取数据
  if not ADODataSet1.Active then
  ADODataSet1.Open;
  SetLength(GTextAD,1);
  GTextAD[0].ImgContent := ADODataSet1.CreateBlobStream(ADODataSet1.FieldByName ('ImgContent'),bmRead);
显示图像
  ms :=  GTextAD[0].ImgContent;
  TntImage1.Picture.Bitmap.LoadFromStream(ms);
  ms.Free;