error control add-in

SINOEUNSTEVENNEANG

i get the error when i try to use add-in on RTC page. and really don't know what's wrong with it


my code
==================================================

Imports System
Imports System.Collections.Generic
Imports System.Text
Imports Microsoft.Ink
Imports System.Drawing
Imports Microsoft.Dynamics.Framework.UI.Extensibility
Imports Microsoft.Dynamics.Framework.UI.Extensibility.WinForms
Imports System.Windows.Forms

Namespace NavInkControl
<ControlAddInExport("blueTechnology.bt_i.khmertextbox")> _
Public Class khmertextbox
Inherits WinFormsControlAddInBase
' Implements IObjectControlAddInDefinition
Private _SNTEXTBOX As TextBox
Private _loaded As Boolean = False

''' Creates the control for displaying and adding signatures.
Protected Overrides Function CreateControl() As Control
_SNTEXTBOX = New TextBox

Dim a As InkDivisionType

' _inkControl.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
' _inkControl.MinimumSize = New Size(40, 50)
' _inkControl.MaximumSize = New Size(Int16.MaxValue, 100)
_SNTEXTBOX.Font = New Font("Limon S1", 15, FontStyle.Bold, GraphicsUnit.Display, 0)
Return _SNTEXTBOX
End Function

#Region "IObjectControlAddInDefinition Members"

Public Event ControlAddIn As ControlAddInEventHandler

''' Gets a value indicating whether the Value property instance has changed. true if this instance has changed its value; otherwise, false.
Public ReadOnly Property HasValueChanged() As Boolean
Get
Return _SNTEXTBOX.Text
End Get
End Property

''' Gets or sets the value.
Public Property Value() As Object
Get
'Return Me._inkControl.Ink.Save()
Return Me._SNTEXTBOX.Text

End Get
Set(ByVal value As Object)
Me._SNTEXTBOX.Text = value
End Set
End Property
#End Region
End Class

End Namespace

thmartin

If you write

ControlAddInExport("blueTechnology.bt_i.khmertextbox")

then AFAIK that is the "Control Add-In Name" you use to set up in the Add-In table in NAV.

SINOEUNSTEVENNEANG

SINOEUNSTEVENNEANG wrote:

i get the error when i try to use add-in on RTC page. and really don't know what's wrong with it


my code
==================================================

Imports System
Imports System.Collections.Generic
Imports System.Text
Imports Microsoft.Ink
Imports System.Drawing
Imports Microsoft.Dynamics.Framework.UI.Extensibility
Imports Microsoft.Dynamics.Framework.UI.Extensibility.WinForms
Imports System.Windows.Forms

Namespace NavInkControl
<ControlAddInExport("blueTechnology.bt_i.khmertextbox")> _
Public Class khmertextbox
Inherits WinFormsControlAddInBase
' Implements IObjectControlAddInDefinition
Private _SNTEXTBOX As TextBox
Private _loaded As Boolean = False

''' Creates the control for displaying and adding signatures.
Protected Overrides Function CreateControl() As Control
_SNTEXTBOX = New TextBox

Dim a As InkDivisionType

' _inkControl.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
' _inkControl.MinimumSize = New Size(40, 50)
' _inkControl.MaximumSize = New Size(Int16.MaxValue, 100)
_SNTEXTBOX.Font = New Font("Limon S1", 15, FontStyle.Bold, GraphicsUnit.Display, 0)
Return _SNTEXTBOX
End Function

#Region "IObjectControlAddInDefinition Members"

Public Event ControlAddIn As ControlAddInEventHandler

''' Gets a value indicating whether the Value property instance has changed. true if this instance has changed its value; otherwise, false.
Public ReadOnly Property HasValueChanged() As Boolean
Get
Return _SNTEXTBOX.Text
End Get
End Property

''' Gets or sets the value.
Public Property Value() As Object
Get
'Return Me._inkControl.Ink.Save()
Return Me._SNTEXTBOX.Text

End Get
Set(ByVal value As Object)
Me._SNTEXTBOX.Text = value
End Set
End Property
#End Region
End Class

End Namespace

i found my mistake .thanks so much