ert11569etg 2014-08-21 11:09
浏览 1359

delphi导出word,导出的word中设置页码,若首页不显示页码,首页的页头会出现一条横线

这是具体的代码:

Fdoc.Sections.Item(1).Footers.Item(1).PageNumbers.Add(wdAlignRowCenter,true);
Fdoc.Sections.Item(1).Footers.Item(1).PageNumbers.ShowFirstPageNumber:=false;
//以上两行代码是给所有页页脚处设上页码,再将首页页码不显示的
Fdoc.ActiveWindow.ActivePane.View.SeekView := wdseekcurrentpageheader;
Fword.Selection.ParagraphFormat.Borders.Item(wdBordertop).LineStyle := wdLineStyleNone;
Fword.Selection.ParagraphFormat.Borders.Item(wdBorderbottom).LineStyle := wdLineStyleNone;
Fword.Selection.ParagraphFormat.Borders.Item(wdBorderleft).LineStyle := wdLineStyleNone;
Fword.Selection.ParagraphFormat.Borders.Item(wdBorderright).LineStyle := wdLineStyleNone;
//以上四行是讲所有的页眉的横线去掉不显示的

但是保存完word后,再打开后,会发现首页的页眉处会有一条横线,其他页都没有横线的
请问,怎么将该横线去掉啊,我怎么修改代码都不行

  • 写回答

0条回答 默认 最新

    报告相同问题?

    悬赏问题

    • ¥60 求一个简单的网页(标签-安全|关键词-上传)
    • ¥35 lstm时间序列共享单车预测,loss值优化,参数优化算法
    • ¥15 基于卷积神经网络的声纹识别
    • ¥15 Python中的request,如何使用ssr节点,通过代理requests网页。本人在泰国,需要用大陆ip才能玩网页游戏,合法合规。
    • ¥100 为什么这个恒流源电路不能恒流?
    • ¥15 有偿求跨组件数据流路径图
    • ¥15 写一个方法checkPerson,入参实体类Person,出参布尔值
    • ¥15 我想咨询一下路面纹理三维点云数据处理的一些问题,上传的坐标文件里是怎么对无序点进行编号的,以及xy坐标在处理的时候是进行整体模型分片处理的吗
    • ¥15 CSAPPattacklab
    • ¥15 一直显示正在等待HID—ISP