'Declaration Public Event Click As EventHandler
'Usage Dim instance As SideButtonBase Dim handler As EventHandler AddHandler instance.Click, handler
public event EventHandler Click
'Declaration Public Event Click As EventHandler
'Usage Dim instance As SideButtonBase Dim handler As EventHandler AddHandler instance.Click, handler
public event EventHandler Click
GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxCellType inputcell1 = new GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxCellType(); inputcell1.Multiline = true; inputcell1.SideButtons.Add(new GrapeCity.Win.Spread.InputMan.CellType.SideButtonInfo() { Text = "A" }); fpSpread1.Sheets[0].Cells[1, 1].CellType = inputcell1; private void SideButton_Click(object sender, EventArgs e) { MessageBox.Show("Side Button Clicked"); } private void fpSpread1_EditModeOn(object sender, EventArgs e) { if (fpSpread1.EditingControl is GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxEditingControl) { GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxEditingControl c = (GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxEditingControl)fpSpread1.EditingControl; c.SideButtons[0].Click += SideButton_Click; } } private void fpSpread1_EditModeOff(object sender, EventArgs e) { if (fpSpread1.EditingControl is GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxEditingControl) { GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxEditingControl c = (GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxEditingControl)fpSpread1.EditingControl; c.SideButtons[0].Click -= SideButton_Click; } }
Dim inputcell1 As New GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxCellType() inputcell1.Multiline = True inputcell1.SideButtons.Add(New GrapeCity.Win.Spread.InputMan.CellType.SideButtonInfo() With {.Text = "A"}) FpSpread1.Sheets(0).Cells(1, 1).CellType = inputcell1 Private Sub SideButton_Click(sender As Object, e As EventArgs) MessageBox.Show("Side Button Clicked") End Sub Private Sub FpSpread1_EditModeOn(sender As Object, e As EventArgs) Handles FpSpread1.EditModeOn If TypeOf FpSpread1.EditingControl Is GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxEditingControl Then Dim c As GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxEditingControl = DirectCast(FpSpread1.EditingControl, GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxEditingControl) AddHandler c.SideButtons(0).Click, AddressOf SideButton_Click End If End Sub Private Sub FpSpread1_EditModeOff(sender As Object, e As EventArgs) Handles FpSpread1.EditModeOff If TypeOf FpSpread1.EditingControl Is GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxEditingControl Then Dim c As GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxEditingControl = DirectCast(FpSpread1.EditingControl, GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxEditingControl) RemoveHandler c.SideButtons(0).Click, AddressOf SideButton_Click End If End Sub