怎么样把ADODATASET中的数据转换到MenoryStream中，反过来再转过来怎么转？

Question

见题目

Answer 1

要看是什类型的字段，只要像TBlob等字段才支持存到流中。比如：
var
  MS: TMemoryStream;
begin
  MS := TMemoryStream.Create;
  try
    Query1Images.SaveToStream(MS);
    (TBolobField(Query1.FieldByName(FieldName)).SaveToStream;//存
    (TBolobField(Query1.FieldByName(FieldName)).LoadFromStream
    (MS);//取
  finally
    MS.Free;
  end;

Answer 2

有一点小错，把Query1该成ADODATASET，Query1Images.SaveToStream(MS);去掉。