FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 > ColorFilterItem クラス : ColorFilterItem コンストラクタ |
'Declaration Public Function New( _ ByVal filterTextColor As Boolean, _ ByVal color As Color _ )
'使用法 Dim filterTextColor As Boolean Dim color As Color Dim instance As New ColorFilterItem(filterTextColor, color)
public ColorFilterItem( bool filterTextColor, Color color )
fpSpread1.Sheets[0].Cells[0, 0, 2, 2].BackColor = Color.Red; FarPoint.Win.Spread.ColorFilterItem colorfilter = new FarPoint.Win.Spread.ColorFilterItem(false, Color.Red); FarPoint.Win.Spread.IRowFilter rowFilter = new FarPoint.Win.Spread.HideRowFilter(fpSpread1.ActiveSheet); FarPoint.Win.Spread.FilterColumnDefinition fd = new FarPoint.Win.Spread.FilterColumnDefinition(1, FarPoint.Win.Spread.FilterListBehavior.Custom); fd.Filters.Add(colorfilter); rowFilter.ColumnDefinitions.Add(fd); fpSpread1.ActiveSheet.RowFilter = rowFilter; fpSpread1.ActiveSheet.AutoFilterColumn(1, colorfilter.DisplayName, 0); fpSpread1.ActiveSheet.AutoFilterMode = FarPoint.Win.Spread.AutoFilterMode.EnhancedContextMenu;
FpSpread1.Sheets(0).Cells(0, 0, 2, 2).BackColor = Color.Red Dim colorfilter As New FarPoint.Win.Spread.ColorFilterItem(False, Color.Red) Dim rowFilter As New FarPoint.Win.Spread.HideRowFilter(FpSpread1.ActiveSheet) Dim fd As New FarPoint.Win.Spread.FilterColumnDefinition(1, FarPoint.Win.Spread.FilterListBehavior.Custom) fd.Filters.Add(colorfilter) rowFilter.ColumnDefinitions.Add(fd) FpSpread1.ActiveSheet.RowFilter = rowFilter FpSpread1.ActiveSheet.AutoFilterColumn(1, colorfilter.DisplayName, 0) FpSpread1.ActiveSheet.AutoFilterMode = FarPoint.Win.Spread.AutoFilterMode.EnhancedContextMenu