Friend WithEvents ge As FarPoint.Win.Spread.CellType.GeneralEditor
Private Sub FpSpread1EditModeOn(ByVal sender As Object, ByVal e As System.EventArgs) Handles FpSpread1.EditModeOn
ge = CType(FpSpread1.EditingControl, FarPoint.Win.Spread.CellType.GeneralEditor)
Dim eh As FarPoint.Win.Spread.CellType.GeneralEditor.SubEditorCancelEventHandler = AddressOf geSubEditorOpening
AddHandler ge.SubEditorOpening, eh
ge.BorderStyle = BorderStyle.Fixed3D
ge.SubEditor = New tEditor
End Sub
Private Function geSubEditorOpening(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.CellType.GeneralEditor.SubEditorCancelEventArgs)
As Boolean
e.Cancel = True
If e.Cancel = True Then
Return True
Else
Return False
End If
End Function