我试了代码中item(2)处的各种情况,总是有问题。现在贴在下面的代码运行提示:集合所要求的成员不存在!我把带*号的行屏蔽掉,能出来两条直线了,就是第二条线的前端多出一条竖线!其实,我就想在文档不同的位置插入横线,大家帮帮忙!!    WordApplication1.Connect;
    WordApplication1.Visible := True;
    WordApplication1.Documents.Add(EmptyParam, EmptyParam);
    WordDocument1.Connect;
    WordApplication1.ActiveWindow.View.Type_ := wdPageView;    WordApplication1.Selection.TypeParagraph; //回车
    
    WordParagraphFormat1.ConnectTo(WordApplication1.Selection.Paragraphs.item(1).Format);
    WordParagraphFormat1.Borders.Item(1).LineStyle := wdLineStyleSingle; //画单水平线    WordApplication1.Selection.TypeParagraph; //回车
    
    *WordParagraphFormat1.ConnectTo(WordApplication1.Selection.Paragraphs.item(2).Format);
    WordParagraphFormat1.Borders.Item(2).LineStyle := wdLineStyleSingle; //画单水平线