在程序里如何控制word,让word换行。(50分)

在程序里如何控制word,让word换行，用#13,#10 word只显示了两个方框。
请高手给予解答。谢谢！

把光标移到下一行的格子里开始写
Selection.TypeParagraph

我以前写的一个程序,供你参考.
WordApp:=CreateOleObject('word.Application');
WordApp.Caption:='调用word';
WordApp.Visible:=True;
path:=ExtractFilePath(Paramstr(0));
WordApp.documents.Open(path+'Template/contract.doc');

WordApp.Selection.Font.Size :=10;
WordApp.Selection.MoveDown(wdLine,8,wdMove);
WordApp.Selection.MoveRight(wdCell,2,wdMove);
WordApp.Selection.TypeText(FormatDateTime('mm-dd,yyyy',Date));WordApp.Selection.TypeParagraph;
WordApp.Selection.TypeText('aaaaa');
WordApp.Selection.TypeParagraph;
WordApp.Selection.TypeParagraph;;

两种办法：
1.
S: Selection;
...
S := WordApplication1.Selection;
S.TypeText('题型 C');
S.TypeParagraph;
2.
ARange := Doc.Range(EmptyParam, EmptyParam);
Pars.Add(EmptyParam);
n:=n+1;
ARange := Pars.Item.Range;
ARange.Text := 'This is a column ';
Pars.Add(EmptyParam);
n:=n+1;
ARange := Pars.Item.Range;
.........

我希望是将一个字符串s替换到word里，
s='1.aaaaaa. 2.bbbbbb. 3.ccccccc. 4.dddddddd'
替换到word后，显示为
1.aaaaaa.
2.bbbbbb.
3.ccccccc.
4.dddddddd'