在word中怎么样让光标移动在第二页(第三页或者第n页)(急150)(100分)

  • 主题发起人 主题发起人 xu1890
  • 开始时间 开始时间
X

xu1890

Unregistered / Unconfirmed
GUEST, unregistred user!
在word中怎么样让光标移动在第二页(第三页或者第n页)
同时大家有没有做过在word中的第二页或者第三页插入图片的经验,请赐教!
谢谢……。
 
分不够,想办法提供,请各位赐教!!!
 
WordApplication1.Selection.InsertAfter('第');
mmm:=wdCharacter;
WordApplication1.Selection.Move(mmm,nnn);
WordApplication1.Selection.Fields.Add(WordApplication1.Selection.Range,aaa,mmm,nnn);
aaa:=wdFieldNumPages;
WordApplication1.Selection.InsertAfter('页,共');
WordApplication1.Selection.Move(mmm,nnn);
WordApplication1.Selection.Fields.Add(WordApplication1.Selection.Range,aaa,mmm,nnn);

WordApplication1.Selection.InsertAfter('页');

WordApplication1.ActiveWindow.ActivePane.View.SeekView := wdSeekMainDocument;
 
用快捷鍵ctrl + g 然後輸入頁碼!!
 
up
怎么没有人?[:D][:D][8D][8D]
 
up
怎么没有人?[:D][:D][8D][8D]
 
是要在delphi下控制word吗?
 
// 移动光标到指定页首
procedure GotoPageNumber(WrdApp: TWordApplication;PageNumber:OleVariant);
var
what,which,Count:OleVariant;
begin
what:=wdGoToPage;
which:=wdGoToNext;
Count:=WrdApp.Selection.Information[wdNumberOfPagesInDocument];
WrdApp.Selection.GoTo_(what,which,Count,PageNumber);
end;
 
后退
顶部