VBA 中的 Coreldraw 多个轮廓
Coreldraw Multiple Contours in VBA
伙计们,我正在尝试设置一个可编辑的三色文本
基本上我想要的是黑色的文字
第一个 1mm 的白色轮廓
第二个 2mm 厚的黑色轮廓
我尝试了以下两步轮廓
ActiveSelection.CreateContour cdrContourOutside, 2, 2, , , CreateRGBColor(0, 0, 0), CreateRGBColor(255, 255, 255)
这完全符合我的要求,当我编辑文本时,轮廓会更改为新文本,但是轮廓的宽度相同 (2mm),而不是我想要的 1 和 2mm
我也无法为每个轮廓指定正确的颜色
如果我分开第一个轮廓然后添加另一个轮廓,这会给我不同宽度和颜色的轮廓,但是我会失去编辑能力,因为轮廓没有附加到文本
我所知道的任何想法都是可能的,因为我已经看到一个商业宏可以做到这一点
感谢任何帮助
马克
我最多只能向您展示对象模型。我没有 CorelDraw,因此无法测试任何东西。
这里是link到CorelDraw Object Model。
http://apps.corel.com/partners_developers/csp/resources/CorelDRAW%20VBA%20Object%20Model.pdf
这里是 link 到 Programming Guide for CorelDraw。
http://apps.corel.com/partners_developers/csp/resources/dvba_pg.pdf
您可以查看编程指南第 72 页的 "Applying Effects",这可能会有帮助。
我建议还查看从 .Shapes
对象创建曲线,然后查看 TextRange
对象。 TextRange.Text
属性 是您想要查看的实际文本,TextRange.colorindex
是我认为的文本颜色。您将不得不进行一些探索,但这应该有所帮助。
伙计们,我正在尝试设置一个可编辑的三色文本
基本上我想要的是黑色的文字
第一个 1mm 的白色轮廓
第二个 2mm 厚的黑色轮廓
我尝试了以下两步轮廓
ActiveSelection.CreateContour cdrContourOutside, 2, 2, , , CreateRGBColor(0, 0, 0), CreateRGBColor(255, 255, 255)
这完全符合我的要求,当我编辑文本时,轮廓会更改为新文本,但是轮廓的宽度相同 (2mm),而不是我想要的 1 和 2mm
我也无法为每个轮廓指定正确的颜色
如果我分开第一个轮廓然后添加另一个轮廓,这会给我不同宽度和颜色的轮廓,但是我会失去编辑能力,因为轮廓没有附加到文本
我所知道的任何想法都是可能的,因为我已经看到一个商业宏可以做到这一点
感谢任何帮助
马克
我最多只能向您展示对象模型。我没有 CorelDraw,因此无法测试任何东西。
这里是link到CorelDraw Object Model。 http://apps.corel.com/partners_developers/csp/resources/CorelDRAW%20VBA%20Object%20Model.pdf
这里是 link 到 Programming Guide for CorelDraw。 http://apps.corel.com/partners_developers/csp/resources/dvba_pg.pdf
您可以查看编程指南第 72 页的 "Applying Effects",这可能会有帮助。
我建议还查看从 .Shapes
对象创建曲线,然后查看 TextRange
对象。 TextRange.Text
属性 是您想要查看的实际文本,TextRange.colorindex
是我认为的文本颜色。您将不得不进行一些探索,但这应该有所帮助。