急！！如何用DELPHI来控制POWERPOINT。（就像用VBA来控制PPT一样）！！

或者在DELPHI中使用VBA来对POWERPOINT进行控制。有办法吗？？ 问题点数：100、回复次数：10Top

1 楼sating（）回复于 2002-04-03 21:43:01 得分 0

顶!Top

2 楼sating（）回复于 2002-04-03 21:57:18 得分 0

都没人关注啊??Top

3 楼sating（）回复于 2002-04-03 22:22:51 得分 0

帮帮我吧~~UPUP~~!Top

4 楼fredfei（飞飞）回复于 2002-04-03 22:22:51 得分 100

其实你创建了ole对象后，每一个对象的操作方法都可以是用  
   
  比如；  
  var   pp,Presentations，slide:variant;  
  begin  
  ....  
        Presentations:=createoleobject('excel.Presentations');  
        pp:=Presentations.application;  
        ....  
        slide:=pp.ActivePresentation.Slides.Add(2,ppLayoutText).Select  
   
   
  ActivePresentation.Slides.Add(2,ppLayoutText).Select  
  就是vba的方法，没什么区别吧？你只要清楚各个对象的关系就行  
   
   
   
  哦，对了，你得将ppLayoutText常量改成数值，否则编译不过去Top

5 楼fredfei（飞飞）回复于 2002-04-03 22:24:59 得分 0

其实你创建了ole对象后，每一个对象的操作方法都可以是用  
   
  比如；  
  var   pp,Presentations，slide:variant;  
  begin  
  ....  
        Presentations:=createoleobject('excel.Presentations');  
        pp:=Presentations.application;  
        ....  
        slide:=pp.ActivePresentation.Slides.Add(2,ppLayoutText).Select  
   
   
  ActivePresentation.Slides.Add(2,ppLayoutText).Select  
  就是vba的方法，没什么区别吧？你只要清楚各个对象的关系就行  
   
   
   
  哦，对了，你得将ppLayoutText常量改成数值，否则编译不过去Top

6 楼fredfei（飞飞）回复于 2002-04-03 22:25:45 得分 0

Presentations:=createoleobject('Powerpoint.Presentations');  
  Top

7 楼1860（hzy）回复于 2002-04-03 22:43:40 得分 0

把你的问题讲得详细点.如果作过三层结构的话你就应该知道调用的方法  
  和属性都是类似于应用程序服务器的方法和属性找一本有关vba编程的书,,  
   
  把那些对象和集合搞懂点先.Top

8 楼sating（）回复于 2002-04-03 23:02:32 得分 0

小弟是新手啊，很多东西都不懂。还要大家多多帮助才是。  
   
  我的大体意思就是。用DELPHI对POWERPOINT进行操作，比如新建幻灯片，加入一些图片，AVI，FLASH等。有没有相关的文章？我是刚刚开始学的~~Top

9 楼fredfei（飞飞）回复于 2002-04-03 23:32:34 得分 0

vba你不是很熟嘛？  
  你对应于powerpoint的对象声明几个olevariant变量，然后创建它们  
   
  var   pp,Presentations，slide:olevariant;     //刚才变量类型错  
  begin  
  ....  
        Presentations:=createoleobject('powerpoint.Presentation');     //创建Presentation对象  
        pp:=Presentations.application;     //得到应用实例  
        pp.visible:=True;                               //可视  
        ....       //创建其它powerpoint  
        slide:=pp.ActivePresentation.Slides.Add(2,ppLayoutText).Select  
  //在当前Presentation添加一张幻灯片  
  创建对象后你就可以利用这些对象的方法，比如像上一句  
  （感觉像在重复）  
  你最好先看一下excel读取数据的帖子，有一些操作方法可以借鉴Top

10 楼sating（）回复于 2002-04-04 00:02:31 得分 0

vba不熟啊~我只是在POWERPOINT里用宏录下后可以看到VBA的源码。所以想在DELPHI中用VBA的东西。比较方便一些~~  
  Powerpoint.Pressentation相关的对象方法有没有比较全的？我想看看呀~~  
   
  Top

11 楼sating（）回复于 2002-04-04 00:06:57 得分 0

不会吧没有结贴啊~~~~大家继续啊~~还有分数~~Top

相关问题

• vba
• excel
• application
• pplayouttext
• slides
• powerpoint
• presentation
• 对象
• pp
• activepresentation

• 帖主：sating
• fredfei

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载