public class MyCornerRenderer : FarPoint.Win.Spread.CellType.IRenderer
{
public bool CanOverflow() { return true; }
public bool CanBeOverflown() { return true; }
public virtual void PaintCell(Graphics g, Rectangle r, FarPoint.Win.Spread.Appearance appear, object value, bool issel, bool isl, float zoom) {
g.FillRectangle(Brushes.Green, 0, 0, 30, 30);
}
public Size GetPreferredSize(Graphics g, Size size, FarPoint.Win.Spread.Appearance appear, object value, float zoomFactor)
{
size = new Size(10, 10);
return size;
}
}
private void Form1_Load(object sender, EventArgs e)
{
fpSpread1.ActiveSheet.SheetCornerStyle.Renderer = new MyCornerRenderer();
}
Public Class MyCornerRenderer
Implements FarPoint.Win.Spread.CellType.IRenderer
Public Sub PaintCell(g As Graphics, r As Rectangle, appearance As FarPoint.Win.Spread.Appearance, value As Object, isSelected As Boolean, isLocked As Boolean, zoomFactor As Single) Implements FarPoint.Win.Spread.CellType.IRenderer.PaintCell
g.FillRectangle(Brushes.Green, 0, 0, 30, 30)
End Sub
Public Function CanBeOverflown() As Boolean Implements FarPoint.Win.Spread.CellType.IRenderer.CanBeOverflown
Return True
End Function
Public Function CanOverflow() As Boolean Implements FarPoint.Win.Spread.CellType.IRenderer.CanOverflow
Return True
End Function
Public Function GetPreferredSize(g As Graphics, size As Size, appear As FarPoint.Win.Spread.Appearance, value As Object, zoomFactor As Single) As Size Implements FarPoint.Win.Spread.CellType.IRenderer.GetPreferredSize
size = New Size(10, 10)
Return size
End Function
End Class
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
FpSpread1.ActiveSheet.SheetCornerStyle.Renderer = New MyCornerRenderer()
End Sub