Memo line feed Problems

Development and Application of VCL components for memo line breaks
Http://www.delphi2007.net/DelphiVCL/html/delphi_20061222223342174.html
I saved the memo control content (including line breaks) to the database, and then pulled it from the database into a line. The data obtained is in the same format as the input data, how can this problem be solved?

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;

change the field type to memo. The carriage return ID of Delphi is #13 #10
for example, fieldbyname ('memo') during storage '). asstring: = memo1.text + #13 #10;