我在OLE中内嵌了个WORD文件,请问,我如何用程序控制其翻页,紧急,请回复

解决方案 »

  1.   

    procedure TForm1.Button1Click(Sender: TObject);
    begin
      if OleContainer1.State <> osRunning then OleContainer1.DoVerb(ovSHOW);
      OleContainer1.OleObject.ActiveWindow.ActivePane.SmallScroll(2);
    end;
      

  2.   


     OleContainer1.DoVerb(ovPrimary);
     OleContainer1.OleObject.ActiveWindow.ActivePane.VerticalPercentScrolled := 50;
      

  3.   

    不是啊,我是说在保持OLE状态下,就是说不在编辑状态,只在开始内嵌了后翻页,可以实现吗
      

  4.   

    GOBACK???请问怎么用啊,能详细点吗?