FarPoint.Win.Spread アセンブリ > FarPoint.Win.Spread 名前空間 > FpSpread クラス : SelectionRenderer プロパティ |
'宣言
Public Property SelectionRenderer As ISelectionRenderer
public ISelectionRenderer SelectionRenderer {get; set;}
このプロパティが使用できるのは実行時のみです。
public class SelectionRenderer : FarPoint.Win.Spread.ISelectionRenderer { public void PaintSelection(Graphics g, int x, int y, int width, int height) { SolidBrush selectionBrush = new SolidBrush(Color.FromArgb(100, SystemColors.ControlDark)); g.FillRectangle(selectionBrush, x, y, width, height); selectionBrush.Dispose(); } } FarPoint.Win.Spread.FpSpread fpSpread1 = new FarPoint.Win.Spread.FpSpread(); FarPoint.Win.Spread.SheetView shv = new FarPoint.Win.Spread.SheetView(); SelectionRenderer sr = new SelectionRenderer(); fpSpread1.Location = new Point(10, 10); fpSpread1.Height = 200; fpSpread1.Width = 400; Controls.Add(fpSpread1); fpSpread1.Sheets.Add(shv); fpSpread1.SelectionRenderer = sr; fpSpread1.ActiveSheet.AddSelection(0, 0, 2, 2);
Public Class SelectionRenderer Implements FarPoint.Win.Spread.ISelectionRenderer Public Sub PaintSelection(ByVal g As Graphics, ByVal x As Integer, ByVal y As Integer, ByVal width As Integer, ByVal height As Integer) Implements FarPoint.Win.Spread.ISelectionRenderer.PaintSelection Dim selectionBrush As New SolidBrush(Color.FromArgb(100, SystemColors.ControlDark)) g.FillRectangle(selectionBrush, x, y, width, height) selectionBrush.Dispose() End Sub End Class Dim fpSpread1 As New FarPoint.Win.Spread.FpSpread() Dim shv As New FarPoint.Win.Spread.SheetView() Dim sr As New SelectionRenderer() fpSpread1.Location = New Point(10, 10) fpSpread1.Height = 200 fpSpread1.Width = 400 Controls.Add(fpSpread1) fpSpread1.Sheets.Add(shv) fpSpread1.SelectionRenderer = sr fpSpread1.ActiveSheet.AddSelection(0, 0, 2, 2)