5,388
社区成员
发帖
与我相关
我的任务
分享Delphi与PowerPoint的问题
请问一下，如何用Delphi检测是否已安装PowerPoint（XP）？
用OLE Server应该可以吧，
还有一个，如何用Delphi调用直接播放PowerPoint文件呢，我用ShellExecute，在一台机子上直接播放，而另外一台却打开了文件了，为何？
用OLE Server应该可以吧，
还有一个，如何用Delphi调用直接播放PowerPoint文件呢，我用ShellExecute，在一台机子上直接播放，而另外一台却打开了文件了，为何？
...全文
请发表友善的回复…
发表回复
lfstudy 2002-07-24
- 打赏
- 举报
up
quake1007 2002-07-24
- 打赏
- 举报
组件：POWERPOINTAPPLICATION！
TRY
TRY
POWERPOINTAPPLICATION。CONNECT；
EXCEPT ON E：EXCEPTION DO
BEGIN
E。MESSAGE：=‘POWERPOINT NOT INSTALL’
RAISE；
END；
END；
FORM1。SETFOCUS；
EXCEPT
ON E：EXCEPTION DO
BEGIN
SHOWMESSAGE（E。MESSAGE）；
POWEROINTAPPLICATION。DISCONNECT；
END；
END；
TRY
TRY
POWERPOINTAPPLICATION。CONNECT；
EXCEPT ON E：EXCEPTION DO
BEGIN
E。MESSAGE：=‘POWERPOINT NOT INSTALL’
RAISE；
END；
END；
FORM1。SETFOCUS；
EXCEPT
ON E：EXCEPTION DO
BEGIN
SHOWMESSAGE（E。MESSAGE）；
POWEROINTAPPLICATION。DISCONNECT；
END；
END；
