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 Modelhttp://apps.corel.com/partners_developers/csp/resources/CorelDRAW%20VBA%20Object%20Model.pdf

这里是 link 到 Programming Guide for CorelDrawhttp://apps.corel.com/partners_developers/csp/resources/dvba_pg.pdf

您可以查看编程指南第 72 页的 "Applying Effects",这可能会有帮助。

我建议还查看从 .Shapes 对象创建曲线,然后查看 TextRange 对象。 TextRange.Text 属性 是您想要查看的实际文本,TextRange.colorindex 是我认为的文本颜色。您将不得不进行一些探索,但这应该有所帮助。