调用PowerPoint的Dispatch接口，将PPT装换为图片
//首先导入一堆的东西#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();}office版本号 类型库
--------------------------------------------------
Microsoft Access 97 Msacc8.olb
Microsoft Jet Database 3.5 DAO350.dll
Microsoft Binder 97 Msbdr8.olb
Microsoft Excel 97 Excel8.olb
Microsoft Graph 97 Graph8.olb
Microsoft Office 97 Mso97.dll
Microsoft Outlook 97 Msoutl97.olb
Microsoft PowerPoint 97 Msppt8.olb
Microsoft Word 97 Msword8.olb
Microsoft Access 2000 Msacc9.olb
Microsoft Jet Database 3.51 DAO360.dll
Microsoft Binder 2000 Msbdr9.olb
Microsoft Excel 2000 Excel9.olb
Microsoft Graph 2000 Graph9.olb
Microsoft Office 2000 Mso9.dll
Microsoft Outlook 2000 Msoutl9.olb
Microsoft PowerPoint 2000 Msppt9.olb
Microsoft Word 2000 Msword9.olb
Microsoft Access 2002 Msacc.olb
Microsoft Excel 2002 Excel.exe
Microsoft Graph 2002 Graph.exe
Microsoft Office 2002 MSO.dll
Microsoft Outlook 2002 MSOutl.olb
Microsoft PowerPoint 2002 MSPpt.olb
Microsoft Word 2002 MSWord.olb
Microsoft Office Access 2003 Msacc.olb
Microsoft Office Excel 2003 Excel.exe
Microsoft Graph 2003 Graph.exe
Microsoft Office 2003 MSO.dll
Microsoft Office Outlook 2003 MSOutl.olb
Microsoft Office PowerPoint 2003 MSPpt.olb
Microsoft Office Word 2003 MSWord.olb
页:
[1]