怎么使Memo中的文本换行？

如何使Memo中的文本换行？？？？？
Memo中的文本是从数据库中导出来的，是一个大文本字段。
我想要文本中有句号时就自动换行........
各位高手，要怎样做才可以???

[解决办法]
Memo1.Text:=stringreplace(Memo1.Text, '。 ', '。 '+#13,[rfReplaceAll]);