Memo换行问题

我把Memo控件内容（包含换行）存入数据库以后，然后再从数据库中取出就成了一行字了，我想取出来的数据和输入的数据格式一样，怎么才能解决哪？

procedure   TFormDemo.ButtonWriteClick(Sender:   TObject);  
  begin  
      AdoQuery.SQL.Text   :=   'Insert   B(TextFile)   Values(:TextFile)';  
      AdoQuery.Parameters.ParamByName('TextFile').LoadFromFile('C:\odbcconf.log',   ftMemo);  
      AdoQuery.ExecSQL;  
  end;  
   
  procedure   TFormDemo.ButtonReadClick(Sender:   TObject);  
  begin  
      AdoQuery.SQL.Text   :=   'Select   TextFile   From   B';  
      AdoQuery.Open;  
      TMemoField(AdoQuery.FieldByName('TextFile')).SaveToFile('C:\TEST.TXT');  
      Memo.Lines.LoadFromFile('C:\TEST.TXT');  
  end;  
 

 
      把字段变为Memo类型,Delphi的回车标识是:   #13#10  
   
      如存储时     FieldByName('Memo').AsString   :=   Memo1.text   +   #13#10;

[新闻]Google iPhone语音识别程序已经上线
博客园首页 社区 新闻频道 小组 博问 网摘 闪存