FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 > SpreadView クラス : FilterActive フィールド |
'Declaration Public Const FilterActive As Integer
'使用法 Dim value As Integer value = SpreadView.FilterActive
public const int FilterActive
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