Delphi中操作PowerPoint幻灯片的示例代码

本文整理自网络，侵删。

 
在Delphi中处理PowerPoint幻灯片的示例代码。

使用单位

uses System.Win.ComObj;
声明变量

var
  PowerPoint: OLEVariant;
操作PowerPoint幻灯片

PowerPoint连接到
PowerPoint := CreateOleObject('PowerPoint.Application');

开始幻灯片放映
PowerPoint.ActivePresentation.SlideShowSettings.Run;

显示下一张幻灯片
PowerPoint.ActivePresentation.SlideShowWindow.View.Next;

显示上一张幻灯片
PowerPoint.ActivePresentation.SlideShowWindow.View.Previous;

显示第一张幻灯片
PowerPoint.ActivePresentation.SlideShowWindow.View.First;

显示最后一张幻灯片
PowerPoint.ActivePresentation.SlideShowWindow.View.Last;
 

相关阅读 >>

Delphi监控指定进程防止被关闭

Delphi indy 10tidftp中的directorylisting使用

Delphi webbrowser 查找对话框

Delphi qr /条形码扫描仪应用示例代码（使用zxing，tframestand）

Delphi 调节音量代码

Delphi中使用 twebbrowser 编辑网页

Delphi 最快字符串查找(匹配)算法

Delphi获得硬盘所有分区

Delphi windows xp下屏蔽ctrl_alt_del键的方法

Delphi webbrowser 去除滚动条和边框

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi中操作PowerPoint幻灯片的示例代码