delphi - 如何在 PowerPoint 中找到当前编辑的幻灯片？

Question

我正在为 PowerPoint 编写一个加载项，并且想要从编辑窗口中的当前幻灯片中获取文本。以下方法有效，但仅当在幻灯片选择器 Pane 中选择幻灯片时才有效。

xSelection := PowerPointApp.ActiveWindow.Selection;
if xSelection.Type = ppSelectionSlides then
begin
  xSlide := xSelection.SlideRange.Item(1);
end;

我一直在MSDN追着我的尾部试图找出找出当前幻灯片的正确方法是什么。 DocumentWindow 似乎没有当前幻灯片。

Answer 1

你看过吗

ActiveWindow.View.Slide.SlideIndex

此链接很有用http://support.microsoft.com/kb/163194