VSTO Office二次开发PPTRibbonX命令操作及对象添加

本篇分享对于Power Point中一些命令的操作和对于一些比较常用对象、特殊对象的添加功能。

对于Power Point命令操作:
有了前一篇《[转]VSTO Office二次开发RibbonX代码结构》的了解,就可以尝试现实自己的RibbonX的相关元素的操作了,这里提供简单的小示例:
1.创建外接程序。
创建一个PPT的外接程序,在《VSTO Office二次开发对PowerPoint功能简单测试》随笔中有介绍,如何创建一个简单的PPT外接程序。
2.创建功能区(XML)。
在项目右键单击添加,弹出“添加新项”,添加“功能区(XML)”,以XML的形式创建功能区。
在Ribbon1.xml添加如下代码,定义三个回调事件"MyCopy"\"MyCut"\"GetInfo":

<?xml version="1.0" encoding="UTF-8"?>
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="Ribbon_Load">
    <commands>
        <!--PPT中的文件保存功能不能使用-->
        <command idMso="FileSave" enabled="false"/>
        <!--"MyCut"扩展PPT中"剪切"命令的响应事件-->
        <command idMso="Cut" enabled="true" onAction="MyCut"/>
        <command idMso="Copy" enabled="true"  onAction="MyCopy"/>
    </commands>
    <ribbon>
        <tabs>
            <tab idMso="TabAddIns">
                <group id="MyGroup"
                       label="My Group">
                    <button id="MyButton" label="MyButton" onAction="GetInfo"/>
                </group>
            </tab>
        </tabs>
    </ribbon>
</customUI>

3.回调函数编写。
在Ribbon1.cs文件中添加对于回调函数的处理代码:

/// <summary>
        /// MyButton的回调方法
        /// </summary>
        /// <param name="control"></param>
        public void GetInfo(Office.IRibbonControl control)
        {
            MessageBox.Show("Released");
        }

        /// <summary>
        /// MyCopy的回调方法
        /// </summary>
        /// <param name="control">触发控件</param>
        /// <param name="cancelDefault">是否取消功能</param>
        public void MyCopy(Office.IRibbonControl control, ref bool cancelDefault)
        {
            bool isSuccess = IsSuccess();
            //如果cancelDefault返回false,则取消该操作
            cancelDefault = isSuccess;
        }

        /// <summary>
        /// 要处理的业务
        /// </summary>
        /// <returns></returns>
        private bool IsSuccess()
        {
            return false;
        }

4.关联外接程序。
前几步把Ribbon设计完毕,现在与Power Point外接程序进行关联:(重写RequestService方法)

private Ribbon1 ribbon;//重新定义Ribbon1
        /// <summary>
        /// 重写RequestService方法
        /// </summary>
        /// <param name="serviceGuid"></param>
        /// <returns></returns>
        protected override object RequestService(Guid serviceGuid)
        {
            if (serviceGuid == typeof(Office.IRibbonExtensibility).GUID)
            {
                if (ribbon == null)
                    ribbon = new Ribbon1();
                return ribbon;
            }
            return base.RequestService(serviceGuid);
        }

5.功能测试。
F5运行程序,简单测试。对于“文件保存”、“剪切”、“复制”操作的测试。

对于操作的RibbonX的Office 2010所有命令(Office2010ControlIDs.exe也有对于2007支持的命令):
参见:http://social.msdn.microsoft.com/Forums/pl/worddev/thread/337946b2-edc4-4f40-bb45-1babf58a5e7e
下载:http://www.microsoft.com/download/en/details.aspx?id=6627

对于RibbonX进行对Office程序的XML编程很不错。几个可参考资源
使用 Open XML 文件格式自定义 Office Fluent 功能区
利用您自己的功能区选项卡和控件扩展 2007 Office System
细品RibbonX(12):使用XML Notepad自定义功能区
http://www.360doc.com/content/09/1110/11/406571_8725398.shtml

对于PowerPoint添加对象:
微软也提供了一些调用接口:
《Shapes.AddPicture 方法 》http://msdn.microsoft.com/zh-cn/library/office/jj735114.aspx
《OLE 程序标识符 (PowerPoint)》http://msdn.microsoft.com/zh-cn/library/office/ff746158.aspx
常用对象添加调用代码:

        /// <summary>
        /// 添加常用对象
        /// 通过OLE添加对象,支持网络文件访问
        /// 添加公式:Equation.3
        /// 添加图表:MSGraph.Chart
        /// </summary>
        /// <param name="slide">幻灯片</param>
        /// <param name="filePath">文件路径</param>
        /// <param name="left">居左位置</param>
        /// <param name="top">居右位置</param>
        /// <param name="width">宽度</param>
        /// <param name="height">高度</param>
        #region 添加对象操作     
        //添加图片
        private void AddADPicture(PowerPoint.Slide slide, string filePath, float left, float top, float width, float height)
        {
            PowerPoint.Shape pic;
            pic = slide.Shapes.AddPicture(filePath, Office.MsoTriState.msoFalse, Office.MsoTriState.msoTrue,left,top,width,height);
            pic.Name = "Picture";
            pic.Tags.Add("Name", "Value");//或用tag标签携带数据
        }
        //添加媒体文件
        private void AddMedia(PowerPoint.Slide slide, string filePath, float left, float top, float width, float height)
        {
            PowerPoint.Shape media;
            media = slide.Shapes.AddMediaObject(filePath,left,top,width,height);
            media.Name = "Media";
        }
        //添加任意对象,但需要激活操作
        private void AddOLEDPath(PowerPoint.Slide slide, string filePath, float left, float top, float width, float height)
        {
            PowerPoint.Shape oledFile;
            oledFile = slide.Shapes.AddOLEObject(left,top,height,width,FileName: filePath, DisplayAsIcon: Office.MsoTriState.msoTrue);//, DisplayAsIcon: Office.MsoTriState.msoTrue
            oledFile.Name = filePath;            
        }
        //添加Flash播放器,需要本机上安装Flash播放插件
        private void AddFlashObj(PowerPoint.Slide slide, string fileName, float left, float top, float width, float height)
        {
            object oleControl = slide.Shapes.AddOLEObject(left, top, width, height, "ShockwaveFlash.ShockwaveFlash", "",
                Office.MsoTriState.msoFalse, "", 0, "", Office.MsoTriState.msoFalse).OLEFormat.Object;
            Type oleControlType = oleControl.GetType();              /* 设置flash播放属性 */
            oleControlType.InvokeMember("EmbedMovie", BindingFlags.SetProperty, null, oleControl, new object[] { true });
            oleControlType.InvokeMember("Playing", BindingFlags.SetProperty, null, oleControl, new object[] { true });
            oleControlType.InvokeMember("Movie", BindingFlags.SetProperty, null, oleControl, new object[] { fileName });// 设置Flash文件路径          
            oleControlType.InvokeMember("Scale", BindingFlags.SetProperty, null, oleControl, new object[] { "ExactFit" });//设置显示比例为:严格匹配        
            oleControlType.InvokeMember("ScaleMode", BindingFlags.SetProperty, null, oleControl, new object[] { 2 });
        }
        //添加3D模型播放器,需要本机上安装BS Contact插件
        private void AddBSContactObj(PowerPoint.Slide slide, string fileName, float left, float top, float width, float height)
        {
            object oleControl = slide.Shapes.AddOLEObject(left, top, width, height, "BSContact.BSContact", "",
                Office.MsoTriState.msoFalse, "", 0, "", Office.MsoTriState.msoFalse).OLEFormat.Object;
            Type oleControlType = oleControl.GetType();              /* 设置BSContact播放属性 */
            oleControlType.InvokeMember("Enabled", BindingFlags.SetProperty, null, oleControl, new object[] { true });
            oleControlType.InvokeMember("url", BindingFlags.SetProperty, null, oleControl, new object[] { fileName });// 设置BSContact文件路径          
            oleControlType.InvokeMember("walkSpeed", BindingFlags.SetProperty, null, oleControl, new object[] { 0 });
            oleControlType.InvokeMember("animateAllViewpoints", BindingFlags.SetProperty, null, oleControl, new object[] { false });
        }
        //添加图片,以OLE对象形式
        private void AddOlePicture(PowerPoint.Slide slide, string fileName, float left, float top, float width, float height)
        {
            object oleControl = slide.Shapes.AddOLEObject(left, top, width, height, "Forms.Image.1", "",
                Office.MsoTriState.msoFalse, "", 0, "", Office.MsoTriState.msoFalse).OLEFormat.Object;
            Type oleControlType = oleControl.GetType();
            oleControlType.InvokeMember("Enabled", BindingFlags.SetProperty, null, oleControl, new object[] { true });

            Bitmap bitmap = new Bitmap(fileName);
            stdole.StdPicture pic = (stdole.StdPicture)ImageConverter2.ImageToIpicture(bitmap);
            oleControlType.InvokeMember("Picture", BindingFlags.SetProperty, null, oleControl, new object[] { pic });
        }
        //添加Windows Media Player播放器,本机安装Windows Media Player(插件)
        private void AddOleMedia(PowerPoint.Slide slide, string fileName, float left, float top, float width, float height)
        {
            //MediaPlayer.MediaPlayer.1或WMPlayer.OCX.7
            object oleControl = slide.Shapes.AddOLEObject(left, top, width, height, "WMPlayer.OCX.7", "",
                Office.MsoTriState.msoFalse, "", 0, "", Office.MsoTriState.msoFalse).OLEFormat.Object;
            Type oleControlType = oleControl.GetType();
            oleControlType.InvokeMember("Enabled", BindingFlags.SetProperty, null, oleControl, new object[] { true });
            oleControlType.InvokeMember("Url", BindingFlags.SetProperty, null, oleControl, new object[] {fileName });
        }
        //添加Form窗体,窗体中添加Image控件,单击弹出"PPT"信息提示
     //命名引用:using MF = Microsoft.Vbe.Interop.Forms;
private void AddOleForm(PowerPoint.Slide slide, string fileName, float left, float top, float width, float height) { var oleControl = slide.Shapes.AddOLEObject(left, top, width, height, "Forms.Frame.1", "", Office.MsoTriState.msoFalse, "", 0, "", Office.MsoTriState.msoFalse); var obj = oleControl.OLEFormat.Object; oleControl.Name = "Frame"; PowerPoint.OLEFormat oleF = slide.Shapes.Range("Frame").OLEFormat; MF.Frame frm1 = (MF.Frame)oleF.Object; frm1.Caption = "PP"; MF.Image image = (MF.Image)frm1.Controls.Add("Forms.Image.1"); image.Click += new MF.ImageEvents_ClickEventHandler(image_Click); Bitmap bitmap = new Bitmap(fileName); image.Picture = (stdole.StdPicture)ImageConverter2.ImageToIpicture(bitmap); } void image_Click() { MessageBox.Show("PPT"); } #endregion

其中,图片转化类,将StdPicture转换为Bitmap:

 public class ImageConverter2 : System.Windows.Forms.AxHost
    {
        public ImageConverter2()
            : base("59EE46BA-677D-4d20-BF10-8D8067CB8B33")
        {
        }

        public static stdole.IPictureDisp ImageToIpicture(System.Drawing.Image image)
        {
            return (stdole.IPictureDisp)ImageConverter2.GetIPictureDispFromPicture(image);
        }

        public static System.Drawing.Image IPictureToImage(stdole.StdPicture picture)
        {
            return ImageConverter2.GetPictureFromIPicture(picture);
        }
    }

 也可以添加Word\Excel\PPT《VSTO Office二次开发对PPT自定义任务窗格测试》,发现通过添加OLE对象使用ClassName标识的形式,可以添加本机安装的很多Com组件,在PPT中插入的ActiveX组件基本都可以通过OLE对象通过程序添加到PPT中。

 

转载于:https://www.cnblogs.com/SanMaoSpace/archive/2013/03/01/2939498.html

已标记关键词 清除标记
表情包
插入表情
评论将由博主筛选后显示,对所有人可见 | 还能输入1000个字符
相关推荐
第一部分:VSTO介绍 本书的第一部分介绍了Office对象模型和Office主互操作程序集(PIA)。您还将学习如何使用Visual Studio使用Visual Studio 2005 Tools for OfficeVSTO)的功能来构建文档后面的自动化可执行文件,加载项和代码。 第一章“办公编程介绍”介绍了Office对象模型,并对其基本结构进行了研究。本章介绍如何使用对象,集合和枚举所有Office对象模型中找到的基本类型。您还将学习如何使用Office对象模型中的对象和集合公开的属性,方法和事件。第1章还介绍了将Office对象模型暴露于.NET代码的PIAs,并介绍了如何在VSTO项目中使用和引用Office PIA。 第2章“Office解决方案简介”介绍了Office应用程序的定制和扩展的主要方式。本章介绍可以使用VSTO创建的各种Office解决方案。 这本书的其他部分 第二部分.NET中的Office编程 本书的第二部分更深入地介绍了Office对象模型。第3章到第5章涵盖了Excel,第6章到第8章封面Word,第9章到第11章封面展示,第12章介绍了InfoPath。这些章节还有一些关于应用特定功能和问题的讨论。例如,第3章讨论如何在.NET for Excel中构建自定义公式。第5章详细讨论了Excel特定的“区域”问题。您可以选择第二部分的哪些章节,只要您只对Excel开发感兴趣,可以阅读第3章至第5章,然后跳到本书第3部分。 第三部分VSTO办公编程 本书第三部分由第13至20章组成,介绍了Visual Studio 2005 Tools for OfficeOffice开发带来的功能。第三部分描述了VSTO的所有功能,包括在Excel和Word文档中使用Windows窗体控件,使用与Office对象的数据绑定,构建智能标记以及将Windows窗体控件添加Office的任务窗格。 第四部分高级办公室编程 最后,本书第四部分介绍了高级编程主题。第21章和第22章谈到使用VSTO在Word和Excel中使用XML。第23章介绍如何构建Word和Excel的托管COM加载项。第24章介绍如何在VSTO中开发Outlook加载项。
<p> <b><span style="font-size:14px;"></span><span style="font-size:14px;background-color:#FFE500;">【Java面试宝典】</span></b><br /> <span style="font-size:14px;">1、68讲视频课,500道大厂Java常见面试题+100个Java面试技巧与答题公式+10万字核心知识解析+授课老师1对1面试指导+无限次回放</span><br /> <span style="font-size:14px;">2、这门课程基于胡书敏老师8年Java面试经验,调研近百家互联网公司及面试官的问题打造而成,从筛选简历和面试官角度,给出能帮助候选人能面试成功的面试技巧。</span><br /> <span style="font-size:14px;">3、通过学习这门课程,你能系统掌握Java核心、数据库、Java框架、分布式组件、Java简历准备、面试实战技巧等面试必考知识点。</span><br /> <span style="font-size:14px;">4、知识点+项目经验案例,每一个都能做为面试的作品展现。</span><br /> <span style="font-size:14px;">5、本课程已经在线下的培训课程中经过实际检验,老师每次培训结束后,都能帮助同学们运用面试技巧,成功找到更好的工作。</span><br /> <br /> <span style="font-size:14px;background-color:#FFE500;"><b>【超人气讲师】</b></span><br /> <span style="font-size:14px;">胡书敏 | 10年大厂工作经验,8年Java面试官经验,5年线下Java职业培训经验,5年架构师经验</span><br /> <br /> <span style="font-size:14px;background-color:#FFE500;"><b>【报名须知】</b></span><br /> <span style="font-size:14px;">上课模式是什么?</span><br /> <span style="font-size:14px;">课程采取录播模式,课程永久有效,可无限次观看</span><br /> <span style="font-size:14px;">课件、课程案例代码完全开放给你,你可以根据所学知识,自行修改、优化</span><br /> <br /> <br /> <span style="font-size:14px;background-color:#FFE500;"><strong>如何开始学习?</strong></span><br /> <span style="font-size:14px;">PC端:报名成功后可以直接进入课程学习</span><br /> <span style="font-size:14px;">移动端:<span style="font-family:Helvetica;font-size:14px;background-color:#FFFFFF;">CSDN 学院APP(注意不是CSDN APP哦)</span></span> </p>
©️2020 CSDN 皮肤主题: 大白 设计师:CSDN官方博客 返回首页