VBA中的Coreldraw多个轮廓

Question

我正在尝试设置可编辑的三色文本的人

基本上我想要的是黑色文字

1mm的第一轮廓为白色

第二个轮廓是2mm厚的黑色

我尝试了以下两步轮廓

ActiveSelection.CreateContour cdrContourOutside, 2, 2, , , CreateRGBColor(0, 0, 0), CreateRGBColor(255, 255, 255)

这可以按我的要求完美地工作，当我编辑文本时，轮廓会更改为新文本，但是轮廓都是相同的宽度（2mm），而不是我想要的1＆2mm

我也无法为每个轮廓指定正确的颜色

如果我将第一个轮廓分开，然后添加另一个轮廓，这会给我提供不同宽度和颜色的轮廓，但是由于轮廓未附加到文本上，因此我失去了编辑能力

我所知道的任何想法都是可行的，因为我已经看到了可以做到的商业宏

任何帮助表示赞赏

标记

Answer 1

我能为您做的最好的就是向您展示对象模型。 我没有CorelDraw，因此无法测试任何东西。

这是CorelDraw对象模型的链接。 http://apps.corel.com/partners_developers/csp/resources/CorelDRAW%20VBA%20Object%20Model.pdf

这里是指向CorelDraw编程指南的链接。 http://apps.corel.com/partners_developers/csp/resources/dvba_pg.pdf

您可以在编程指南的第72页上查找“应用效果”，这可能会有所帮助。

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