OleContainer 를 써서 ms-word 를 불러왔습니다..
procedure TForm1.Button2Click(Sender: TObject);
var App : OleVariant;
begin
OleCon.CreateObjectFromFile('c:\test.DOC', False);
OleCon.DoVerb(ovShow);
App := OleCon.OleObject.Application;
end;
이렇게 불러왔을 때
ms-word 페이지가 40 페이지라면 10 페이지 로 이동하는 하는 방법은 없을까요...?
불러와서 원하는 페이지 로 이동하고 싶은데.. 어떻게 하면 되나여 ?
var
What, Which, Count, Name: OleVariant;
Selection: OleVariant;
begin
......
What := wdGoToPage;
Which := wdGoToNext;
Name := '40';
Selection.GoTo(What, Which, Count, Name);
end;
<!--CodeE-->