a亚洲精品_精品国产91乱码一区二区三区_亚洲精品在线免费观看视频_欧美日韩亚洲国产综合_久久久久久久久久久成人_在线区

首頁 > 編程 > Delphi > 正文

如何在delphi5中實現對word文檔頁眉的設置?

2019-11-18 18:01:34
字體:
來源:轉載
供稿:網友
 

我這有一個對當前頁面的設置代碼

var  

mmm,nnn,aaa:OleVariant;

begin

    mmm:=wdLine;
    nnn:=1;
    aaa:=wdFieldPage;
    WordApp.ActiveWindow.ActivePane.View.SeekView :=wdSeekCurrentPageHeader ;
    WordApp.Selection.Move(mmm,nnn);
    WordApp.Selection.ParagraphFormat.Alignment := wdAlignParagraphCenter;

    WordApp.Selection.InsertAfter('第');
    mmm:=wdCharacter;
    WordApp.Selection.Move(mmm,nnn);
    WordApp.Selection.Fields.Add(WordApp.Selection.Range,aaa,mmm,nnn);
    aaa:=wdFieldNumPages;
    WordApp.Selection.InsertAfter('頁/第');
    WordApp.Selection.Move(mmm,nnn);
    WordApp.Selection.Fields.Add(WordApp.Selection.Range,aaa,mmm,nnn);

    WordApp.Selection.InsertAfter('頁');
    WordApp.ActiveWindow.ActivePane.View.SeekView := wdSeekMainDocument;

end;

可是只能修改第一頁的,怎么修改后面的頁面的頁眉?


上一篇:Delphi中實現可以更改大小的對話框

下一篇:Delphi操作Wrod的幾個知識點

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
學習交流
熱門圖片

新聞熱點

疑難解答

圖片精選

網友關注

主站蜘蛛池模板: 欧美国产一区二区三区 | 天天摸夜夜摸爽爽狠狠婷婷97 | 日韩国产在线播放 | 99精品全国免费观看视频软件 | 久久久久久一区 | 91中文在线观看 | 欧美日韩网 | 国产美女久久 | 精品视频久久 | 精品自拍视频 | 欧美在线网站 | 亚洲 欧美日韩 国产 中文 | 国产在线拍揄自揄拍视频 | 毛片毛片毛片毛片毛片毛片毛片毛片毛片毛片 | 成人av教育 | 久久成人综合 | 中文字幕在线观看亚洲 | 天天操网| 精品国产一区二区三区久久久蜜月 | aaa级片 | 国产精品视频 | 国产精选一区二区三区 | 国产日韩欧美91 | 亚州中文字幕 | 视频一区免费观看 | 日韩www.| 三区视频| 91爱啪啪 | 亚洲无限乱码一二三四麻 | 毛片在线免费 | 黄色一级片在线看 | 国产一区二区自拍 | 欧美成人免费网站 | 国产一区二区欧美 | 91精品国产乱码久久久久久久久 | 免费黄色在线观看 | 少妇激烈床戏视频 | 一级欧美一级日韩片 | 精品96久久久久久中文字幕无 | 午夜影视免费观看 | 一区二区在线视频免费观看 |