Question

我正在尝试将活动页面导出到现有的PowerPoint演示文稿。我知道如何从标题栏中执行此操作，但我想将其合并到我正在编写的IronPython代码中，以便我可以同时执行多个幻灯片。

谢谢，约瑟夫

Answer 1

这将打开powerpoint并每页导出一个可视化：

from System.IO import *
from Spotfire.Dxp.Application.Visuals import VisualContent
from System.Drawing import Bitmap, Graphics, Rectangle, Point
import clr
clr.AddReference("Microsoft.Office.Interop.PowerPoint")
import Microsoft.Office.Interop.PowerPoint as PowerPoint

powerpoint = PowerPoint.ApplicationClass()
powerpoint.Visible = True
pres=powerpoint.Presentations.Add()
slideCounter = 1

for visual in Document.ActivePageReference.Visuals:
    #print visual.Title

    #export graphic to temp file
    vc = visual.As[VisualContent]()
    bm = Bitmap(2000, 1200)
    g = Graphics.FromImage(bm)
    r = Rectangle(Point(0,0), bm.Size)
    vc.Render(g, r)
    file = Path.GetTempFileName()
    bm.Save(file)

    #pp setup
    slide=pres.Slides.Add(slideCounter, PowerPoint.PpSlideLayout.ppLayoutTitleOnly)
    slideCounter = slideCounter+1
    slide.Shapes.AddPicture((file), False, True, 30, 60, 650, 400)
    title=slide.Shapes.Title
    txt=slide.Shapes.AddTextBox(1,10,500,500,100)
    title.Top=0.1
    obj=slide.Shapes.Title.TextFrame.TextRange
    obj.Font.Size=24

您可以使用以下内容循环浏览页面：

for page in Document.Pages:
    Document.ActivePageReference=page

根据此处的代码进行调整：https://tibbr.tibcommunity.com/tibbr/#!/messages/69369

Answer 2

它们在Spotfire API中。每个页面都有很多可视化内容。查看下面的代码片段，您可能会有所了解。

foreach (Spotfire.Dxp.Application.Page page in SpotfireDocument.Pages) 
allVisuals.AddRange(page.Visuals); 
// in my case SpotfireDocument extends {Spotfire.Dxp.Application.Document}

但是，这里的任何人都知道如何查看整个活动页面吗？上面的方法将使活动页面具有子视觉效果，而不是整个页面本身。

将Spotfire图形导出到PowerPoint的脚本

2 个答案: