PROSAGA码农传奇-visio-如何迭代Visio几何行

<div class =“post-text”itemprop =“text”>
  <P>
    要获得所选的形状，您可以使用
     <code>
      Selection
    </code>
     财产
     <code>
      Window
    </code>
    。一旦你有了这个，你可以用这样的东西遍历形状，部分和行（注意
    <a href="http://visualsignals.typepad.co.uk/vislog/2015/12/getting-started-with-c-in-linqpad-with-visio.html" rel="nofollow noreferrer">
      我在这里使用LINQPad
    </A>
    ，但唯一的区别是你如何掌握应用程序）：
  </p>
   <pre>
    <code>
      var vApp = MyExtensions.GetRunningVisio();

var firstComponent = (short)Visio.VisSectionIndices.visSectionFirstComponent;

foreach (Visio.Shape shp in vApp.ActiveWindow.Selection)
{
    for (short s = firstComponent; s < firstComponent + shp.GeometryCount; s++)
    {
        var geoSection = shp.Section[s];
        for (short r = 1; r < geoSection.Count; r++)
        {
            var rt = shp.RowType[s, r];
            Enum.GetName(typeof(Visio.VisRowTags), rt).Dump();
            //You now have the shape, section and row and, if you want to,
            //you can get to cells by using CellsSRC syntax:
            //var someCellValue = shp.CellsSRC[s, r, (short)Visio.VisCellIndices.visX].ResultIU;
            //How you address the cell will depend on the row type that you're targeting.
        }   
    }
}

</code>
  </pre>
  <P>
    如果您使用它进行导出，那么您可能还希望将文档保存为SVG。以下是一些选项：
  </p>
  <UL>
    <LI>
      <a href="https://msdn.microsoft.com/en-us/vba/visio-vba/articles/page-export-method-visio" rel="nofollow noreferrer">
        Page.Export
      </A>
    </LI>
    <LI>
      <a href="http://unmanagedvisio.com/products/svg-publish/" rel="nofollow noreferrer">
        HTML导出工具
      </A>
       来自@Nikolay
    </LI>
  </UL>
  <P>
    另一种选择可能是看看
    <a href="https://msdn.microsoft.com/en-us/vba/visio-vba/articles/shape-paths-property-visio" rel="nofollow noreferrer">
      路径
    </A>
     /
    <a href="https://msdn.microsoft.com/en-us/vba/visio-vba/articles/shape-pathslocal-property-visio" rel="nofollow noreferrer">
      PathsLocal
    </A>
      形状的属性。例如，在foreach形状内：
  </p>
   <pre>
    <code>
      for (int x = 1; x <= shp.Paths.Count; x++)
{
    Visio.Path p = shp.PathsLocal[x] as Visio.Path;
    p.Points(0.1, out Array pntsArr);
    pntsArr.Dump();
}

</code>
  </pre>
</DIV>