OberonPlace.com Forums  

Go Back   OberonPlace.com Forums > Corel User Forums > CorelDRAW > Macros/Add-ons

Reply
 
Thread Tools Search this Thread Display Modes
  #1  
Old 22-04-2011, 07:05
shark shark is offline
Senior Member
 
Join Date: Aug 2010
Location: Russia, Belgorod
Posts: 146
Default curve and contourgroup effect

Hi
Here's a question - i have a curve [shape1] and contourgroup [shape2] that linked with it.
[shape1].Effect.ContourEffect.Contour.ContourGroup points to [shape2]. So I can get [shape2] using a [shape1]. And how can I get a [shape1] if I have a [shape2] only ? Need to check all shapes and compares .Effect..Contourgroup or may be [shape2] have any property that points to source [shape1] ?

Thanks in advance

Last edited by shark; 23-04-2011 at 06:03.
Reply With Quote
  #2  
Old 02-05-2011, 20:40
runflacruiser's Avatar
runflacruiser runflacruiser is offline
Senior Member
 
Join Date: Jun 2009
Location: Pigeon Forge, TN USA
Posts: 811
Default

Hi.
I hope I'm not oversimplifying this.
Create a circle and add a single outer contour.

Debug with this code.
Code:
Sub test()

ActivePage.Shapes.FindShapes(, cdrContourGroupShape).CreateSelection
ActiveShape.Previous.CreateSelection

End Sub
~John
Reply With Quote
Reply


Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
How to find a effect using CQL ljesus7 CorelDRAW/Corel DESIGNER VBA 3 06-09-2010 15:22
Use Hex colors / Twist Effect Arjen82 New product ideas 2 26-06-2008 22:50
macro for break curve and join curve mgmcs Macros/Add-ons 2 26-05-2006 23:01
X3 Contour Effect... Which is correct? Kursad General 10 27-01-2006 10:36
diffusion effect on the pic's border leopardo General 1 08-08-2005 09:49


All times are GMT -5. The time now is 18:06.


Powered by vBulletin® Version 3.8.1
Copyright ©2000 - 2023, Jelsoft Enterprises Ltd.
Copyright © 2011, Oberonplace.com