Spread Windows Forms 13.0 Product Documentation
FarPoint.Win.Spread Assembly / FarPoint.Win.Spread Namespace / StickyNoteEventHandler Delegate
ExampleExample


In This Topic
    StickyNoteEventHandler Delegate
    In This Topic
    Obsolete. Use NoteEventHandler instead. Represents a method that handles the sticky note events.
    Syntax
    'Declaration
     
    Public Delegate Sub StickyNoteEventHandler( _
       ByVal sender As Object, _
       ByVal e As StickyNoteEventArgs _
    ) 
    'Usage
     
    Dim instance As New StickyNoteEventHandler(AddressOf HandlerMethod)
    public delegate void StickyNoteEventHandler( 
       object sender,
       StickyNoteEventArgs e
    )

    Parameters

    sender
    e
    Remarks
    For information on the event, refer to the SheetView StickyNoteCreated event.
    Example
    This example shows the use of the StickyNoteCreated event handling.
    private void Form1_Load(object sender, System.EventArgs e)
    {
        fpSpread1.ActiveSheet.SetNote(2, 0, "Head of Development");
        fpSpread1.ActiveSheet.Cells[2, 0].NoteStyle = FarPoint.Win.Spread.NoteStyle.StickyNote;
        FarPoint.Win.Spread.DrawingSpace.StickyNoteStyleInfo nsinfo = new FarPoint.Win.Spread.DrawingSpace.StickyNoteStyleInfo();
        nsinfo = fpSpread1.ActiveSheet.GetStickyNoteStyleInfo(2, 0);
        nsinfo.BackColor = Color.Bisque;
        nsinfo.Font = new Font("Tahoma", 24);
        nsinfo.ForeColor = Color.Cyan;
        nsinfo.Width = 320;
        nsinfo.ShapeOutlineColor = Color.Cyan;
        nsinfo.ShapeOutlineThickness = 1;
        nsinfo.ShadowOffsetX = 3;
        nsinfo.ShadowOffsetY = 3;
        fpSpread1.ActiveSheet.SetStickyNoteStyleInfo(2, 0, nsinfo);
    }
     
    private void fpSpread1_Sheet1_StickyNoteCreated(object sender, FarPoint.Win.Spread.StickyNoteEventArgs e)
    {
        MessageBox.Show("The thickness of the outline is " + e.StickyNoteStyleInfo.ShapeOutlineThickness.ToString());
    } 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    FpSpread1.ActiveSheet.SetNote(2, 0, "Head of Development")
    FpSpread1.ActiveSheet.Cells(2, 0).NoteStyle = FarPoint.Win.Spread.NoteStyle.StickyNote
    Dim nsinfo As FarPoint.Win.Spread.DrawingSpace.StickyNoteStyleInfo = New FarPoint.Win.Spread.DrawingSpace.StickyNoteStyleInfo
    nsinfo = FpSpread1.ActiveSheet.GetStickyNoteStyleInfo(2, 0)
    nsinfo.BackColor = Color.Bisque
    nsinfo.Font = New Font("Tahoma", 24)
    nsinfo.ForeColor = Color.Cyan
    nsinfo.Width = 320
    nsinfo.ShapeOutlineColor = Color.Cyan
    nsinfo.ShapeOutlineThickness = 1
    nsinfo.ShadowOffsetX = 3
    nsinfo.ShadowOffsetY = 3
    FpSpread1.ActiveSheet.SetStickyNoteStyleInfo(2, 0, nsinfo)
    End Sub
     
    Private Sub FpSpread1_Sheet1_StickyNoteCreated(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.StickyNoteEventArgs)
    Handles FpSpread1_Sheet1.StickyNoteCreated
        MessageBox.Show("The thickness of the outline is " & e.StickyNoteStyleInfo.ShapeOutlineThickness.ToString())
    End Sub
    See Also