很奇怪的错误……来看看

Question

Blob := TMemoryStream.Create;
   TBlobField(Query1.FieldByName('Content')).SaveToStream(Blob);
   Blob.Seek(0, soFromBeginning);
   tmpstr:=TStringList.Create;
   tmpstr.LoadFromStream(Blob);
   RichEdit_show.Clear;
   RichEdit_show.Lines.Add('--------------------------------------------');
   RichEdit_show.Lines.Add(tmpstr.Text+'');
   RichEdit_show.Lines.Add('--------------------------------------------');
   Blob.Free;
   tmpstr.Free;这里提示"RichEdit insertion error"怎么回事嗄？
注：Content列存储的是MEMO型的字符串

Answer 1

Blob := TMemoryStream.Create;
   TBlobField(Query1.FieldByName('Content')).SaveToStream(Blob);
   Blob.Seek(0, soFromBeginning);
   tmpstr:=TStringList.Create;
   tmpstr.LoadFromStream(Blob);
   RichEdit_show.Clear;
   RichEdit_show.Lines.Add('--------------------------------------------');
   RichEdit_show.Lines.Add(tmpstr.Text+'');
   RichEdit_show.Lines.Add('--------------------------------------------');
   Blob.Free;
   tmpstr.Free;这里提示"RichEdit insertion error"怎么回事嗄？
注：Content列存储的是MEMO型的字符串

Answer 2

Foot大哥进来接分！谢谢foot大哥 在QQ上热心的帮助偶！