Powerpointapp object

Add-in Express™ Support Service
That's what is more important than anything else

Powerpointapp object
 
Chris Bowman




Posts: 15
 Joined: 2005-02-15
Hi,

I am having issues with the powerpointapp object. Is this part of your interface?

The problem is this:

With 2 slideshows running (different presentations)...

PowerpointApp.SlideshowWindows.Count = 2 (As you would expect)

BUT

PowerpointApp.SlideshowWindows.Item(2).presentation points to the same presentation as item(1)

If you have any suggestions, they would be gratefully received.

Cheers,

Chris
Posted 16 Mar, 2005 14:40:23 Top
Dmitry Kostochko


Add-in Express team


Posts: 2875
 Joined: 2004-04-05
Hi Chris,

I need some time to test this. I'll let you know about the results asap.



Posted 17 Mar, 2005 06:59:03 Top
Dmitry Kostochko


Add-in Express team


Posts: 2875
 Joined: 2004-04-05
Hi Chris,

See the code snippet below. Everything works as expected, i.e. I see two different dialog messages. What PowerPoint version do you use? 


uses MSPpt2000, Dialogs;

procedure TAddInModule.adxCommandBar1Controls0Click(Sender: TObject);
var
  i: Integer;
  Presentation: PowerPointPresentation;
begin
  try
    for i := 1 to PowerPointApp.SlideShowWindows.Count do begin
      Presentation := PowerPointApp.SlideShowWindows.Item(i).Presentation;
      ShowMessage(Presentation.FullName);
    end;
  finally
    Presentation := nil;
  end;
end;



Posted 17 Mar, 2005 08:17:57 Top
Chris Bowman




Posts: 15
 Joined: 2005-02-15
Dmitry,

Huge apologies.

It was a typo in my code. I am programming with jetlag (just spent 24 hours on a plane). When checking my code, I was reading what I wanted to see - NOT what was written.

Regards,

Chris
Posted 17 Mar, 2005 10:52:29 Top