OberonPlace.com Forums  

Go Back   OberonPlace.com Forums > Oberon Products > CurveWorks

Reply
 
Thread Tools Search this Thread Display Modes
  #1  
Old 06-07-2010, 15:42
red.devil016
Guest
 
Posts: n/a
Default Applying Envelopes to Text.

Hello Guys,

I am a C#.Net Developer. I am currently working on a project which focuses on automation of the Art Work generated through CorelDraw X2. We use the Interop.CorelDraw.dll assembly as an interface between .Net and CorelDraw.

The text is being generated on CorelDraw using the CreatArtisticText method. We have to Arch this Text along the center for 40%. I am not really sure how to do this. Somebody suggested to me that this could be achieved using Envelopes. But, I have no idea about Envelopes. Can anybody help me achieve this. Thanks.
Reply With Quote
  #2  
Old 06-07-2010, 16:47
shelbym's Avatar
shelbym shelbym is offline
Senior Member
 
Join Date: Nov 2002
Location: Cheyenne, WY
Posts: 1,769
Blog Entries: 9
Send a message via ICQ to shelbym Send a message via AIM to shelbym Send a message via MSN to shelbym Send a message via Yahoo to shelbym
Default Text

You should be able to do this with an Envelope or by creating an ellipse and fitting the text to the path.

Example of Envelope here: Placing a custom envelope on Text

Example of Fit Text To Path: Fit Text To Path

Hope these help,

-Shelby
Reply With Quote
  #3  
Old 13-07-2010, 09:47
red.devil016
Guest
 
Posts: n/a
Default

Thanks Guys.

I created the Envelope and am trying to Import the File and replace the text. Can you guys help me do that. I am have succeeded in importing the file but I am not able to replace the Text. How do I that ?
Reply With Quote
  #4  
Old 13-07-2010, 13:55
shelbym's Avatar
shelbym shelbym is offline
Senior Member
 
Join Date: Nov 2002
Location: Cheyenne, WY
Posts: 1,769
Blog Entries: 9
Send a message via ICQ to shelbym Send a message via AIM to shelbym Send a message via MSN to shelbym Send a message via Yahoo to shelbym
Default Envelope

If you only import the Enveloped Text you can simply use the .Story to change it, like this:
Code:
Sub ChangeText()
    Dim s As Shape
    
    ActiveLayer.Import "c:\temp\test12.cdr"
    Set s = ActiveShape
    s.Text.Story = "New Text"
End Sub
If you are importing more than just the text, you will have to loop thru the shapes and find the text shape.

-Shelby
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
Export RGB TIFF while applying an ICC Profile copper CorelDRAW/Corel DESIGNER VBA 2 22-03-2010 14:17
Get Text from CSV-File and create Graphics-Object infers Graphic-Text anlulu CorelDRAW/Corel DESIGNER VBA 3 14-03-2009 04:02
Re-Create existing Envelopes with Code Jadus CorelDRAW/Corel DESIGNER VBA 2 12-07-2005 22:22


All times are GMT -5. The time now is 07:26.


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