Spread ASP.NET 14
FarPoint.Web.Spread Assembly / FarPoint.Web.Spread Namespace / NamedStyleCollection Class / GetEnumerator Method
Example


In This Topic
    GetEnumerator Method (NamedStyleCollection)
    In This Topic
    Gets an IEnumerator object for enumerating through the NamedStyle objects in the collection.
    Syntax
    'Declaration
     
    Public Overridable Function GetEnumerator() As IEnumerator
    'Usage
     
    Dim instance As NamedStyleCollection
    Dim value As IEnumerator
     
    value = instance.GetEnumerator()
    public virtual IEnumerator GetEnumerator()

    Return Value

    IEnumerator object for enumerating the styles in the collection
    Remarks
    This method is for enumerating through the NamedStyle objects in the collection.
    Example
    This example uses the current object returned by the enumerator.
    FarPoint.Web.Spread.NamedStyleCollection nsc = new FarPoint.Web.Spread.NamedStyleCollection();
    FarPoint.Web.Spread.NamedStyle ns = new FarPoint.Web.Spread.NamedStyle("StyleData", "DataAreaDefault");
    FarPoint.Web.Spread.NamedStyle ns1 = new FarPoint.Web.Spread.NamedStyle("HeaderData", "HeaderDefault");
    ns.BackColor = Color.Yellow;
    ns.Border = new FarPoint.Web.Spread.Border(BorderStyle.Double, Color.Blue);
    ns1.BackColor = Color.Teal;
    ns1.Border = new FarPoint.Web.Spread.Border(BorderStyle.Double, Color.Red);
    nsc.AddRange(new Object[] {ns, ns1});
    IEnumerator ie = nsc.GetEnumerator();
    foreach(FarPoint.Web.Spread.NamedStyle n in nsc)
    {
        ie.MoveNext();
        FpSpread1.NamedStyles.Add((FarPoint.Web.Spread.NamedStyle)ie.Current);
        FpSpread1.ActiveSheetView.ColumnHeader.DefaultStyle = (FarPoint.Web.Spread.NamedStyle)ie.Current;
    }
    
    Dim nsc As New FarPoint.Web.Spread.NamedStyleCollection
    Dim ns As New FarPoint.Web.Spread.NamedStyle("StyleData", "DataAreaDefault")
    Dim ns1 As New FarPoint.Web.Spread.NamedStyle("HeaderData", "HeaderDefault")
    Dim n As FarPoint.Web.Spread.NamedStyle
    ns.BackColor = Color.Yellow
    ns.Border = New FarPoint.Web.Spread.Border(BorderStyle.Double, Color.Blue)
    ns1.BackColor = Color.Teal
    ns1.Border = New FarPoint.Web.Spread.Border(BorderStyle.Double, Color.Red)
    nsc.AddRange(New Object() {ns, ns1})
    Dim ie As IEnumerator = nsc.GetEnumerator
    For Each n In nsc
        ie.MoveNext()
        FpSpread1.NamedStyles.Add(ie.Current)
        FpSpread1.ActiveSheetView.ColumnHeader.DefaultStyle = ie.Current
    Next
    See Also