Pongamos que quieres un control que sea un TextArea con una propiedad añadida que indique el tipo de Texto, por decir algo.
Lo llamaremos "Nota" y sería algo así:
Para que el IDE te ofrezca los posibles valores de IDE creas otra clase exportada llamada "TextTypes":
Y todo funciona guay:
![[Imagen: NdmpqMi.png]](https://i.imgur.com/NdmpqMi.png)
Sin embargo, me suena que se podía hacer de otra manera resolviéndolo todo en la clase principal sin tener que declarar la segunda clase que contiene las constantes. ¿Lo he soñado?¿Alguien sabe cómo hacerlo?
Adjunto el micro proyecto para pruebas.
Saludos.
Lo llamaremos "Nota" y sería algo así:
Código:
Export
Inherits TextArea
Public Const _Properties As String = "*,Type{TextTypes.*}=Nota"
Public Const _Group As String = "Form"
Public Const _Similar As String = "TextArea"
Public Const _DrawWith As String = "TextArea"
Property Type As Integer Use $type = 0Para que el IDE te ofrezca los posibles valores de IDE creas otra clase exportada llamada "TextTypes":
Código:
' Gambas class file
Export
Public Const Nota As Integer = 0
Public Const Aviso As Integer = 2
Public Const Memo As Integer = 1
Public Const Confidential As Integer = 3Y todo funciona guay:
Sin embargo, me suena que se podía hacer de otra manera resolviéndolo todo en la clase principal sin tener que declarar la segunda clase que contiene las constantes. ¿Lo he soñado?¿Alguien sabe cómo hacerlo?
Adjunto el micro proyecto para pruebas.
Saludos.
Archivos adjuntos
No podemos regresar