At the request of, or challenge from I should say, Jeff Harrison - I have added an extra feature to the above macro. If you run the macro and press the Create Inner Shadow button you get a black inner shadow, or white if the White Shadow checkbox was ticked.
NEW: Pressing the button with a PLUS sign on it expands the macro interface and provides a button which opens the colour picker dialog. From there you can choose a custom colour for the inner shadow. After choosing your colour press the Apply Inner Shadow button next to the custom colour button to create your inner shadow. I was even kind enough to use the Americanized spelling of the word colour: i.e. color
Please excust the over-compressed video...here is the macro in action (the macro itself is attached):
nice!
Jeff
Brian said:At the request of, or challenge from I should say, Jeff Harrison - I have added an extra feature to the above macro. If you run the macro and press the Create Inner Shadow button you get a black inner shadow, or white if the White Shadow checkbox was ticked.
Messieurs Jeff, Jack et Joe,
thank you kindly for your positive feedback, that's the kind of stuff which motivates me to write more macros. I feel happy that I managed to make something which you guys found helpful. Afterall, you guys are helping people in here all the time and I think that is great!
Best regards,Brian.
Hi everyone,
attached is the same InnerShadow macro previously posted, but pops up a message to let you know grouped objects are not supported at this current time if you try to run it on a group of objects. If you are aware that the macro does not work with groups (at the moment) then there is probably no need to change the macro you already have. I took the easy way out (just for now) on that one because I spent the time making something else.
Did I ever tell you that making one object sit to another in an aligned fashion is a snap?
Just in case it wasn't obvious enough, 1 represents the first shape selected and 2 the second shape selected.
Hi Brian,
Inner Shadow: If the objects aro NOT groupped, the effect CAN be applied to them with no problems.
I received a query from David Milisock regarding the Inner Shadow macro. David's query was in relation to changing the colour of the inner shadow, after applying it.
The macro was intended to work like this:
1. Select a shape, or range of shapes
2. Choose a setting and press the Apply Inner Shadow button, or choose a colour with the Custom button and then apply inner shadow
3. If you are not happy with the result, hit the Undo button and repeat steps 1 & 2 with different settings
Pressing the apply inner shadow button again creates a new inner shadow in addition to the original one.
My understanding of David's query was basically...what if you save the file and come back to it later, or perform dozens more steps and want to come back and change the colour of the inner shadow then? You can't use the Undo button as the inner shadow was created many steps back.
I gave this some thought and revised the macro a little as noted in the following image:
I have sent the macro to David for testing to make sure I haven't introduced any issues with my changes...I have tested myself and it seems fine. Once David confirms all is well I will post the revised macro into the forum.
hi brian ,
I did like your macro ,its wonderfull..
I have a query ,
Can we change the thickness of the shadow and can it apply outer shadow as well.?
Could there be a slight refinement to this macro like converting the shadow to a bitmap with transparent background and antialiasing, add a Gaussian blur, and then insert into powerclip? Or just add a radial for this option?
Set s1 = OrigSelection.ConvertToBitmapEx(cdrRGBColorImage, False, True, 300, cdrNormalAntiAliasing, True, False, 95) s1.Bitmap.ApplyBitmapEffect "Gaussian Blur", "GaussianBlurEffect GaussianBlurRadius=2000,GaussianBlurResampled=0"