Folder CorelDraw MacrosFit Text To Path/Macros


Warning Press Ctrl+Enter to quickly submit your post
Quick Reply  
✏✏✏✏✏✏✏✏✏✏
 
 
  

Next
 From:  Jer (DIAMOND)
 To:  ALL
4294.1 
I want to fit text to a path but I want each letter to be smaller than the letter before it. If that makes sense can anyone help?

EDITED: 1 Aug 2006 by DGL

 

Previous
Next
 From:  Pedaler (ROYBREWER)
 To:  Jer (DIAMOND) 
4294.2 In reply to 4294.1 
Jer,

Are you sure you need text to path? Envelope would be much easier.
See attached for an idea.

If you really need text to path, then David's earlier explanation of using the shape tool to select each node and modify it's height.

Roy Brewer
http://www.engravingconcepts.com
Epilog/Xenetech distributor

EDITED: 5 Dec 2006 by ROYBREWER

 

Previous
Next
 From:  Shaddy
 To:  Jer (DIAMOND) 
4294.3 In reply to 4294.1 

How about changing the size of the font characters before fiting to path?

I made a macro in Corel. It works in 12 and X3, it's a GMS file that gets copied to C:\Program Files\Corel\CorelDRAW Graphics Suite 13\Draw\GMS

or close to it, depending on your version and install options.

Select the text object you want to change. Then run it as a Macro called TextSizer (Sizer12.gms). There's a begining font size and an Ending font size option. Then it divides it up equally depending on the amount of characters.

I just made it this evening, so there isn't as much error handling as there should be.

If you select multiple text objects, it will resize all of them. If you select a text object AND a curve, it will resize then fit to curve. If you select multiple text object and a curve, it will only fit the last text object, the others you do by hand. It's not a finished product, obviously, but some tweaking can meet your needs most likely.

I didn't protect the file, so it's viewable, Maybe it'll help generate interest in VBA. These are the kind of helper macros that can be created. Oh, and thanks to Carl for telling me about the Command Group function so hitting Undo afterwards will undo the whole thing instead of step by step (and running out of Undo's)

Shaddy

PS, putting a small number first will make the text increase in size, large number first decreases.

EDITED: 11 Jul 2006 by SHADDY

 

Previous
Next
 From:  Pedaler (ROYBREWER)
 To:  Shaddy 
4294.4 In reply to 4294.3 
Shaddy,

Very nice! Thanks.

Roy Brewer
http://www.engravingconcepts.com
Epilog/Xenetech distributor

 

Previous
Next
 From:  Jer (DIAMOND)
 To:  Shaddy 
4294.5 In reply to 4294.3 
Wow. That is awesome. Thanks.
 

Previous
Next
 From:  Carl (CSEWELL)
 To:  Shaddy 
4294.6 In reply to 4294.3 
Shaddy,

Excellent job on the macro!

The 'beauty' of VBA programming is demonstrated in your macro: it does one thing extremely well that would be very time consuming to do it manually. If you only have to do it once, than manually may be acceptable. With the visibility of the forum, I imagine that you've saved a lot of people a lot of time. Not necessarily today, but down the road. Hopefully, the macro will be easy to find (David?). You also gave them a feature they might not have been able to offer their customers, or something that might differentiate them from another engraver.

And the VBA macro doesn't have to be elegant or contain lots of (or any) error checking. Providing the source code will give those more adventurous types the opportunity to modify your macro, thereby creating something totally new.

Thanks!

Carl

  Guntersville Laser Engraving
  Guntersville, AL
  http://www.guntersvillelaser.com

Previous
Next
 From:  PenMan
 To:  Shaddy 
4294.7 In reply to 4294.3 
Thanks for the macro. That is great! I'm sure I'll have a use for it some time in the future.

Pen Man (aka Chris Tegard)
Treasured Creations
www.eTreasuredCreations.com

 

Previous
Next
 From:  Swami
 To:  ALL
4294.8 
How exactly do you use a macro???
 

Previous
Next
 From:  Shaddy
 To:  Swami 
4294.9 In reply to 4294.8 

The ones that have a GMS as the extension, you save it in
C:\Program Files\Corel\CorelDRAW Graphics Suite 13\Draw\GMS
Will be different for the other versions. I've never had a version before 12, so I'm unsure of others.

Then to run it, you click on TOOLS==VISUAL BASIC==PLAY then you select the macro to run
Use the pulldown next to "Macros in" to choose the proper GMS file or project. That will load all the runable macros to the box above it. Then select the macro and click RUN.

For this particualr macro... have the text boxes selected (and curve if you're going that far) before you run it... it uses your selection to know what to alter.

Shaddy

 

Previous
Next
 From:  Swami
 To:  ALL
4294.10 

I tried the Macro, That macro thing is so cool and EASY.
Are there any other Macros i can try out????????

 

Previous
Next
 From:  Shaddy
 To:  Swami 
4294.11 In reply to 4294.10 
I don't have anything ready yet, but there's a bunch here...

http://www.oberonplace.com/vba/drawmacros/index.htm

But the text sizer thing only came to be when someone asked for it... so if you have something you're looking for, maybe post and ask for something specific. Not that I can do it, but there's always a chance.

Shaddy
 

Previous
 From:  Carl (CSEWELL)
 To:  Swami 
4294.12 In reply to 4294.10 
...... and here: http://www.isocalc.com/cooltools/index.htm

Carl

  Guntersville Laser Engraving
  Guntersville, AL
  http://www.guntersvillelaser.com
 
     
 

Rate my interest:

Adjust text size: Smaller 10 Larger

Beehive Forum 1.0.1 |  FAQ |  Docs |  Support |  Donate! ©2002 - 2024 Project Beehive Forum

Forum Stats