https://foro.gambas-es.org/viewtopic.php?f=5&t=3923&p=22182#p22182
-----------------------------------
osunaosuna
Martes, 24 Junio 2014, 13:58

Re: Esta Función Esta Correcta?
-----------------------------------
Codificador....

Si lo de Inherits Export lo se lo que decía es que no creía que apareciera, peeeero hice las pruebas y acá traigo los resultados. si se puede pero deben colocarse varias constantes necesarias mi prueba para que sea mas o menos viables usarlo así como tu dices seria así...

[code linenumbers=false syntax=gambas]
Inherits TextBox

Export

'------------------------estas deben estar para que se vea en tiempo real en el ide 
Public Const _IsControl As Boolean = True
Public Const _DefaultSize As String = "6,6"
Public Const _Family As String = "*"
Public Const _Group As String = "Special"
Public Const _DefaultEvent As String = "Click"
Public Const _DrawWith As String = "TextBox"
Public Const _DefaultArrangement As String = "V" ' Arrange.Vertical

'******************************************************************************************************
'esta de las properti las saque porqu no tengo gana de declarar todas las propiedades
'ya que si pones una nueva al parecer no las suma a las heredas sino que solo te muestra
'la que pones ahi, puede que lo este haciendo mal
'NOTE: Seguir viendo esto.
'
'Public Const _Properties As String = "X{Position},Y{Position}"

Public Sub _new()
'------------------------Se mira 
    Dim oChusma As Observer
    oChusma = New Observer(Me) As "TextBox" 
End Sub

Public Sub TextBox_Change()
'------------------------puede que sea
 Debug "algo esta sucediendo"

End

[/code]


