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