Buenas!.
No encontré un tema similar en la comunidad, puede que en el antiguo foro se encuentre.
Me surgen unas dudas referentes a la construcción del control.
Mi caso era que estoy diseñando el control círculo. Creé su clase, añadí nuevas propiedades.
Ahora quiero añadir valores por defecto para que nos aparezcan en la lista de propiedades del IDE de Gambas.
Dos cuestiones:
Supongamos que quiero que en la lista de propiedades del IDE de Gambas aparezca el valor
por defecto del radio. 20, 30, etc. Que tenga un valor fijo aunque se pueda cambiar luego.
Y ahora supongamos que debe aparecer una lista de valores posibles constantes.
20,30,40
He logrado hacer aparecer el valor 50 en la lista de propiedades haciendo esto:
Código:
Pero luego al ejecutarse el código, sigue diciendo que el me.radio o hradio es 0.
Como si no se asignase el valor de la constante a la propiedad.
[code]Public Const _Properties As String = "*,radio=50,colorprimerplano{Color}"
Inherits DrawingArea
Property radio As Integer Use hradio
Property colorprimerplano As Integer Use hcolorprimerplano
Private refrescador As Timer
Private observadrawing As Observer
Public Sub _new()
observadrawing = New Observer(Me) As "ManejaDrawingArea"
With Me
.W = Me.W
.H = Me.H
.Expand = True
End With
Print hradio
refrescador = New Timer As "ManejaReloj"
With refrescador
.Delay = 500
.Start
End With
End
Saludos