Buenas tardes,
Estoy usando el colortemplate y leer el color siguiendo el ejemplo es fácil pero me gustaría poder pasarle un color que tengo almacenado en una tabla (int) pero no consigo saber como usarlo.
El código básico es el siguiente:
Según un post que he podido leer Erel sugiere el siguiente código:
Me podríais echar un cable, ¿por favor?
Es que no consigo pasar el Int que tengo almacenado para que salga ese color cuando aparezca el cuadro de los colores.
Gracias por adelantado
Espinosa
Estoy usando el colortemplate y leer el color siguiendo el ejemplo es fácil pero me gustaría poder pasarle un color que tengo almacenado en una tabla (int) pero no consigo saber como usarlo.
El código básico es el siguiente:
B4X:
Wait For (Dialog.ShowTemplate(ColorTemplate, "ACEPTAR", "", "CANCELAR")) Complete (Result As Int)
If Result = xui.DialogResponse_Positive Then
Panel.Color = ColorTemplate.SelectedColor
Cambios = True
End If
Según un post que he podido leer Erel sugiere el siguiente código:
B4X:
Sub Process_Globals
Private PreviouslySelectedColor() As Object
Private xui As XUI
End Sub
Sub Globals
Dim dialog As B4XDialog
Dim ColorTemplate As B4XColorTemplate
End Sub
Sub Activity_Create(FirstTime As Boolean)
dialog.Initialize(Activity)
ColorTemplate.Initialize
If PreviouslySelectedColor.Length > 0 Then
ColorTemplate.SelectedHSVColor = PreviouslySelectedColor
End If
End Sub
Sub Activity_Click
Wait For (dialog.ShowTemplate(ColorTemplate, "OK", "", "CANCEL")) Complete (Result As Int)
If Result = xui.DialogResponse_Positive Then
Activity.Color = ColorTemplate.SelectedColor
PreviouslySelectedColor = ColorTemplate.SelectedHSVColor
End If
End Sub
Me podríais echar un cable, ¿por favor?
Es que no consigo pasar el Int que tengo almacenado para que salga ese color cuando aparezca el cuadro de los colores.
Gracias por adelantado
Espinosa