Skip to main content
Set_Screen_name
Set_Screen_name
Known Participant
May 27, 2009
Question

How to defeat the shadow?

  • May 27, 2009
  • 1 reply
  • 981 views

I have an ObjectStyle, that has shadow in its properties. Now i need to switch off this option.

I tried like this:

myDoc.AllObjectStyles.Item("my").ContentEffectsEnablingSettings.EnableDropShadow = False

myDoc.AllObjectStyles.Item("my").FillEffectsEnablingSettings.EnableDropShadow = False
myDoc.AllObjectStyles.Item("my").ObjectEffectsEnablingSettings.EnableDropShadow = False
myDoc.AllObjectStyles.Item("my").StrokeEffectsEnablingSettings.EnableDropShadow = False

It didn't help.

Then tried this (to directly kill some shadow settings):

myDoc.AllObjectStyles.Item("my").ContentTransparencySettings.DropShadowSettings.XOffset = 0
myDoc.AllObjectStyles.Item("my").ContentTransparencySettings.DropShadowSettings.YOffset = 0
myDoc.AllObjectStyles.Item("my").ContentTransparencySettings.DropShadowSettings.Size = 0
myDoc.AllObjectStyles.Item("my").ContentTransparencySettings.DropShadowSettings.Opacity = 0

Also no effect. But in Objstyle properties the "check mark" appeared in grey color (means, as far as i guess, "partly activated").

So, how to switch on/off this ... shadow?

This topic has been closed for replies.

1 reply

Harbs.
Harbs.
Legend
May 27, 2009

Try this:

myStyle.transparencySettings.dropShadowSettings.mode = ShadowMode.NONE

Set_Screen_name
Set_Screen_nameAuthor
Known Participant
May 27, 2009

This worked only on selected object and in this syntaxis:

mInd.Selection.Item(1).TransparencySettings.DropShadowSettings.Mode = 1852796517 'shadow off

mInd.Selection.Item(1).TransparencySettings.DropShadowSettings.Mode = 2020623440 'shadow on

But in ObjStyles doesn't work. Moreover, after manual removing  shadow from object, which has objSt with shadow, this option "almoust" disappear from style properties.  This is smth....

Set_Screen_name
Set_Screen_nameAuthor
Known Participant
May 27, 2009

Worked after this:

myDoc.ObjectStyles.Item(i).ContentEffectsEnablingSettings.EnableDropShadow = True
myDoc.ObjectStyles.Item(i).FillEffectsEnablingSettings.EnableDropShadow = True
myDoc.ObjectStyles.Item(i).ObjectEffectsEnablingSettings.EnableDropShadow = True
myDoc.ObjectStyles.Item(i).TransparencySettings.DropShadowSettings.Mode = 1852796517 'removing shadow from style options. ... Huh...

Thanks for help.

Terms & ConditionsAccessibility statement
Using the community Terms of use Privacy Cookie preferences Do not sell or share my personal information ad choicesAdChoices