新手：关于RICHEDIT；看不懂这个代码，帮忙一下~！

Question

我想将RICHEDIT 编辑的文本保存到ACCESS；下面是我在网上找到的，说是可以应用~！但本人不会用啊~！
   
  TMemoryStream   *   stream   =   new   TMemoryStream();   
  TStringList   *   strList   =   new   TStringList();   
    
  strList->Clear();   
  stream->Clear();   
  m_RichEdit->Lines->SaveToStream(stream);   
  stream->Position=0;   
  strList->LoadFromStream(stream);   
  m_adoTable->FieldByName("stContent")->AsString=strList->Text;   

Answer 1

c++代码
m_RichEdit的内容给stream
stream的内容给strList
strList的内容给m_adoTable的stContent字段

Answer 2

如果是C，那么在DELPHI怎么操作呢？新手真的不懂啊~！

Answer 3

就是说如何在DELPHI 实现RICHEDIT带格式保存到数据库（ACCESS）

Answer 4

Var 
 Stream:TMemoryStream;strList:tStrings;
Begin
  Stream:=TMemoryStream.create;
  StrList:=tStringList.create;
  m_RichEdit.lines.savetoStream(Stream);
  stream.position:=0;
  strList.loadFromStream(stream);
  m_adotable.fieldbyname('stcontent').asstring:=strlist.text;
end

Answer 5

果然是多此一举
m_adotable.fieldbyname('stcontent').asstring:=m_RichEdit.lines.text;不行？ 

Answer 6

晕,Lines是一个TStrings类，本身就有Text属性哈

Answer 7

m_RichEdit.lines.text;好像保存不了格式！

Answer 8

这些是一些关于流的操作问题，这里它用的是内存流，比较方便。你可以上网自己搜索一下，delphi下如何操作流文件。