调用PowerPoint的Dispatch接口,将PPT装换为图片
来源:百度文库 编辑:神马文学网 时间:2024/04/18 23:20:40
//首先导入一堆的东西
#import "MSO9.DLL" named_guids, rename("RGB", "MsoRGB")
#import "VBE6EXT.OLB"
#import "MSPPT9.OLB" \
rename("RGB", "MsoRGB") \
rename("DialogBox", "MsoDialogBox") \
rename("CopyFile", "MsoCopyFile") \
rename("ReplaceText", "MsoReplaceText") \
rename("ExitWindows", "MsoExitWindows"), \
rename("FindText", "MsoFindText")
// 然后使用VS生成MSPPT9.OLB中的Dispatch包装类,当然,你也可以自己用最原始的接口写。
{
CApplication oApp;
if( !oApp.CreateDispatch( _T("PowerPoint.Application")) )
{
AfxMessageBox( _T("无法启动PowerPoint,请确认您的机器上已经正确安装PowerPoint!") );
return;
}
{
CPresentations oPresentations(oApp.get_Presentations());
LPDISPATCH lpDispPresentation = oPresentations.Open( m_strFilePath, TRUE, 0L, FALSE);
if( lpDispPresentation == NULL )
AfxMessageBox( _T("打开文件失败!") );
else
{
CPresentation oPresentation(lpDispPresentation);
const LPCTSTR OUTPUT_FILE_FORMAT = _T("png");
const long OUTPUT_IMG_WIDTH = 1024;
const long OUTPUT_IMG_HEIGHT = 768;
oPresentation.Export( strPath, OUTPUT_FILE_FORMAT, OUTPUT_IMG_WIDTH, OUTPUT_IMG_HEIGHT);
oPresentation.Close();
}
}
oApp.Quit();
}
#import "MSO9.DLL" named_guids, rename("RGB", "MsoRGB")
#import "VBE6EXT.OLB"
#import "MSPPT9.OLB" \
rename("RGB", "MsoRGB") \
rename("DialogBox", "MsoDialogBox") \
rename("CopyFile", "MsoCopyFile") \
rename("ReplaceText", "MsoReplaceText") \
rename("ExitWindows", "MsoExitWindows"), \
rename("FindText", "MsoFindText")
// 然后使用VS生成MSPPT9.OLB中的Dispatch包装类,当然,你也可以自己用最原始的接口写。
{
CApplication oApp;
if( !oApp.CreateDispatch( _T("PowerPoint.Application")) )
{
AfxMessageBox( _T("无法启动PowerPoint,请确认您的机器上已经正确安装PowerPoint!") );
return;
}
{
CPresentations oPresentations(oApp.get_Presentations());
LPDISPATCH lpDispPresentation = oPresentations.Open( m_strFilePath, TRUE, 0L, FALSE);
if( lpDispPresentation == NULL )
AfxMessageBox( _T("打开文件失败!") );
else
{
CPresentation oPresentation(lpDispPresentation);
const LPCTSTR OUTPUT_FILE_FORMAT = _T("png");
const long OUTPUT_IMG_WIDTH = 1024;
const long OUTPUT_IMG_HEIGHT = 768;
oPresentation.Export( strPath, OUTPUT_FILE_FORMAT, OUTPUT_IMG_WIDTH, OUTPUT_IMG_HEIGHT);
oPresentation.Close();
}
}
oApp.Quit();
}
调用PowerPoint的Dispatch接口,将PPT装换为图片
将PPT内容导出为JPG图片
怎样将幻灯片(ppt)转化为图片
将Word快速转换为Powerpoint格式
在PowerPoint中制作光芒四射的背景 PowerPoint播放暂停由我做 插入图片找窍门有效控制PPT文件体积
在PowerPoint中制作光芒四射的背景2 PowerPoint播放暂停由我做 插入图片找窍门有效控制PPT文件体积
PPT教程:Powerpoint实用技巧
word、PPT、PowerPoint
恰到好处的声音:PowerPoint声音操作总动员-制作技巧-PPT
PowerPoint中ppt、pptx、pps和pot格式的区别
收集了两年多的PPT技巧PowerPoint幻灯片演示技巧
一款将MP3嵌入Powerpoint的软件
将Word文档转换为Powerpoint演示文稿
如何将ppt转化为word_flysky
在PPT中实现Flash播放控制 PowerPoint中把图片裁成任意形状
FlashSpring——把PPT转换为Flash格式PowerPoint to Flash converter
在PowerPoint调用几何画板文件
word、PPT、PowerPoint等技巧
PPT教程:Powerpoint一些实用技巧!
PPT教程:Powerpoint一些实用技巧
如何将PPT文件转化为Word文档及最佳打印?_学明的桃源
收集了两年的ppt技巧和 Powerpoint幻灯片演示技巧_我的小天地
收集了两年的ppt技巧和 Powerpoint幻灯片演示技巧_我的小天地。
收集了两年的ppt技巧和 Powerpoint幻灯片演示技巧_我的小天地