BorlandTalk.com

GS · Guest

Hi, from Delphi....
Looping through each slide, I need to determine if it's HIDDEN property is
enabled... i.e. when you are viewing in DISPLAY mode, will that slide be
hidden (not shown), if so, I want to delete it....

I THINK (?) the property I want to look at is ...
ActivePresentation.Slides(2).SlideShowTransition.Hidden (at least according
to the MS docs)
The problem is that this proprty is ALWAYS False (0). In fact the Delphi
compiler tells me that "Comparison always evaluates to False". Stepping
through the code, TransitionObject.Hidden is always 0, even on slides that
are marked as hidden...

Any help greatly appreciated.
Thanks....
George S

Code below

var
lPresentation: PowerPointPresentation;
i: Integer;
sl: _Slide;
TransitionObject: SlideShowTransition;

....
for i := lPresentation.Slides.Count downto 1 do
begin
// For EACH SLIDE
// Get a handle to the current slide
sl := lPresentation.Slides.Item(i);
TransitionObject := sl.Get_SlideShowTransition;
if TransitionObject.Hidden = msoTrue then {this is the line compiler
tells me always evaluates to false}
sl.Delete;
end;