delphi 调用打开powerpoint

johnshen0211 2003-05-07 08:56:40

请问在delphi中，如何通过程序实现打开powerpoint文件。

...全文

157 4 打赏收藏转发到动态举报

写回复

用AI写文章

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

d0347 2003-05-25

打赏
举报

学习

888888888888 2003-05-11

打赏
举报

关注

tfp 2003-05-10

打赏
举报

那如何响应PPT的事件呢

是要捕获系统的消息,还是怎么去做???

qxj 2003-05-07

打赏
举报

法一:用OLE
法二:用SERVER上的控件
uses comobj
var
pptA: TPowerPointApplication;
pptP: TPowerPointPresentation;
ssSet: SlideShowSettings;
ssWin: SlideShowWindow;

procedure TForm1.FormCreate(Sender: TObject);
begin
pptA := TPowerPointApplication.Create(self);
pptA.Visible := msoTrue;
PPtP.ConnectTo(pptA.Presentations.Open('h:\php.pps', msoFalse, msoFalse, msoTrue));
ssSet := PPtP.SlideShowSettings;
ssSet.LoopUntilStopped := msoFalse;
ssSet.ShowType := ppShowTypeSpeaker;
ssSet.Run;
ssWin := PPtP.SlideShowWindow;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
sswin.View.next;//下一页
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
try
pptA.Disconnect;
pptA.Quit;
if assigned(pptA) then pptA.Free;
except
showmessage('PowerPoint has already closed!');
end;
end;

本文介绍如何使用WPS的二次开发功能实现Word、Excel和PPT文档到PDF的转换。涉及WPS软件的安装配置、所需DLL文件及.NET程序集库的使用，并提供了具体的转换方法和注意事项。

本文介绍如何使用Delphi控制PowerPoint进行批量操作，包括将PPT文件中的一页转换为JPG或GIF图像，便于快速查找及制作相册。文中提供了具体的Delphi代码示例。

该博客介绍了在Delphi程序中内嵌PPT播放及相关控制的方案。通过将PowerPoint程序创建到自定义面板，利用WINAPI函数调整窗口大小和位置，隐藏不必要区域。还给出了确定播放区的方法及相关API函数，但在调入过程中存在闪烁问题。此外，提供了完整的源代码。

本文解决 Delphi 的 WebBrowser 控件在自动播放 PowerPoint 文件时出现停止的问题。通过添加按钮并触发其 OnClick 事件，确保演示文稿连续播放。此外，还介绍了如何使按钮不可见但保持有效。

本文提供了一种使用Delphi通过WPS将文档转换为PDF的方法。包括简单的转换函数及二次开发示例，展示了如何创建和操作WPS文档，并导出为PDF格式。