在 C# 中用颜色填充 visio 的形状

Question

您好，我正在使用 c# 创建 visio2013 的形状。现在我需要使用 c# 为形状填充一些颜色我尝试了以下代码，但没有任何意义:( :(

   Visio.Cell cqellname;
            cqellname = shape.get_CellsSRC(
            (short)Visio.VisSectionIndices.visSectionObject,
            (short)Visio.VisRowIndices.visRowFill,
            (short)Visio.VisCellIndices.visFillBkgnd);
            cqellname.FormulaU = "rgb(255,0,0)";

以上代码抛出错误，因为 Cell is Guarded。

  shape.get_CellsSRC((short)Visio.VisSectionIndices.visSectionObject,
        (short)Visio.VisRowIndices.visRowFill,
   (short)Visio.VisCellIndices.visFillBkgnd).FormulaForceU = "RGB(" + R + "," + G + "," + B + ")";

尝试了上面的方法，它没有抛出任何异常，但形状没有任何变化。

我已经尝试过这个解决方案 from Whosebug 但它也不起作用

我可以在 shapesheet FillForeGnd 和 FillBkGnd 中看到我指定的值，但是形状没有填充我给的颜色。

谁能告诉我怎么做..？

Answer 1

如果 FormulaForceU 有效但您没有看到任何视觉变化，那么我假设您没有设置正确的单元格。通常您会设置 FillForegnd 单元格 (visFillForegnd)，除非设置了不同的模式。另请注意（对于 Visio 2013+）如果 FillGradientEnabled 设置为 true，这将覆盖纯色。

最后要记住的是，您定位的形状可能没有几何形状，或者它的 NoFill 单元格设置为 true，实际上您应该定位子/子-形状。

无论哪种情况，您都应该 crack open the ShapeSheet 并查看形状所处的状态。

Answer 2

正如我在上面的回答中提到的（您已将其标记为无用），您定位的形状错误。

现在您已经编辑了您的问题以包含更多详细信息，很清楚您正在处理哪种形状。

您定位的形状似乎是 "BPMN Basic Shapes" 模板中的 "Collapsed Sub-Process"。这是一个组形状，顶层没有几何形状，所以改变它的颜色，就像你在你的问题中所做的那样，没有视觉上的变化。要解决这个问题，您需要找到用于显示背景的子形状。碰巧在这个特定的母版中，包含您需要定位的填充的子形状的索引比父级大 1，因此您可以在代码中使用它。该形状缺少任何其他明确的特征（例如用户单元格），因此可以成为更好的候选者，因此请注意，此方法仅适用于该特定形状。

鉴于您似乎正在使用此模板做一些工作，我的方法是创建模板的副本并对母版进行一些修改以使这种交互更容易一些，但是与此同时，我希望以下代码能够回答您的问题。

如果是这样，请将其标记为已回答。

public void OnCheckFillBPMN()
{
    Color fillColor = Color.FromArgb(1, 255, 0, 0);
    CollapsedSubProcessFill(this.Application.ActiveWindow.Selection.PrimaryItem, fillColor);
}

private void CollapsedSubProcessFill(Visio.Shape vShpIn, Color fillColor)
{
    if (vShpIn != null && vShpIn.Master != null && vShpIn.Master.NameU.StartsWith("Collapsed Sub-Process"))
    {
        //The sub-shape that provides the fill colour in 
        //the 'Collapsed Sub-Process' master is the first index
        //after the group shape. 
        //If you want to use a different method to locate the 
        //correct sub-shape then do that here.
        var targetSubShpId = vShpIn.ID + 1;
        var targetShp = TryGetShapeInCollection(vShpIn.Shapes, targetSubShpId);
        if (targetShp != null)
        {
            var targetCell = targetShp.get_CellsSRC(
                (short)Visio.VisSectionIndices.visSectionObject,
                (short)Visio.VisRowIndices.visRowFill,
                (short)Visio.VisCellIndices.visFillForegnd);
            targetCell.FormulaU = "RGB(" + fillColor.R
                                    + ',' + fillColor.G
                                    + ',' + fillColor.B + ')';
        }
    }
}


private Visio.Shape TryGetShapeInCollection(Visio.Shapes vShps, int shpId)
{
    try
    {
        if (vShps != null)
        {
           var targetShp = vShps.ItemFromID[shpId];
           return targetShp; 
        }  
    }
    catch (System.Runtime.InteropServices.COMException ex)
    {
        if (ex.ErrorCode == -2032465756) //Invalid sheet identifier
        {
            return null;
        }
    }
    return null;
}

在 C# 中用颜色填充 visio 的形状

Filling a shape of visio with color in c#

c#

visio

bpmn

visio2013

bpmn.io