'Base type must be Object
Public Sub DesignerCreateView (Base As Object, Lbl As Label, Props As Map)
mBase = Base
Tag = mBase.Tag
mBase.Tag = Me
' Color Dialog
Dialog.Initialize(mBase)
' let all startup activities finished
CallSubDelayed(Me, "AfterLoadLayout")
End Sub
Public Sub AfterLoadLayout()
mBase.LoadLayout("RTFEditor")
RTE.AddToParent(pnlEditor,10dip,10dip,pnlEditor.Width-20,pnlEditor.height-20)
RTE.RequestFocus