Spread Windows Forms 13.0 Product Documentation
FarPoint.Win.Spread Assembly / FarPoint.Win.Spread Namespace / SpreadView Class / FilterActive Field
Example


In This Topic
    FilterActive Field
    In This Topic
    Specifies the index, 10, for the image for the active filter indicator.
    Syntax
    'Declaration
     
    Public Const FilterActive As Integer
    'Usage
     
    Dim value As Integer
     
    value = SpreadView.FilterActive
    public const int FilterActive

    Field Value

    Integer index corresponding to this part of the user interface
    Example
    This example sets the image for the specified field.
    FarPoint.Win.Spread.SpreadView workbook = fpSpread1.GetRootworkbook(); 
    workbook.SetImage(FarPoint.Win.Spread.SpreadView.FilterActive, Image.FromFile("D:\filter-act-enable.bmp")); 
    workbook.SetImage(FarPoint.Win.Spread.SpreadView.FilterActiveDisabled, Image.FromFile("D:\filter-act-disable.bmp")); 
    workbook.SetImage(FarPoint.Win.Spread.SpreadView.FilterInactive, Image.FromFile("D:\filter-inact-ena.bmp")); 
    workbook.SetImage(FarPoint.Win.Spread.SpreadView.FilterInactiveDisabled, Image.FromFile("D:\filter-inact-dis.bmp")); 
    
    Random r = new Random();
    int i, j = 0;
    for (i = 0; i <= 3; i++)
        for (j = 0; j<= 3; j++)
        {
            fpSpread1.ActiveSheet.SetValue(i, j, r.Next().ToString());
        }
    
    fpSpread1.ActiveSheet.Columns[0].AllowAutoFilter = true;
    
    Image indicator;
    indicator = workbook.GetImage(4);
    pictureBox1.Image = indicator;
    Dim workbook As FarPoint.Win.Spread.SpreadView = FpSpread1.GetRootworkbook()
    workbook.SetImage(workbook.FilterActive, Image.FromFile("D:\filter-act-enable.bmp"))
    workbook.SetImage(workbook.FilterActiveDisabled, Image.FromFile("D:\filter-act-disable.bmp"))
    workbook.SetImage(workbook.FilterInactive, Image.FromFile("D:\filter-inact-ena.bmp"))
    workbook.SetImage(workbook.FilterInactiveDisabled, Image.FromFile("D:\filter-inact-dis.bmp"))
    
    Dim r As New Random
    Dim i, j As Integer
    For i = 0 To 3
        For j = 0 To 3
            FpSpread1.ActiveSheet.SetValue(i, j, r.Next.ToString())
        Next j
    Next i
    
    FpSpread1.ActiveSheet.Columns(0).AllowAutoFilter = True
    
    Dim indicator As Image
    indicator = workbook.GetImage(4)
    PictureBox1.Image = indicator
    Remarks
    The index for the enabled active filter indicator is 10.
    See Also