#Region Activity Attributes#FullScreen:False#IncludeTitle:True#End Region
Sub Process_Globals'These global variables will be declared once when the application starts.'These variables can be accessed from all modules.EndSub
Sub Globals'These global variables will be redeclared each time the activity is created.'These variables can only be accessed from this module.Private be_b4x_Categorias As B4XComboBoxPrivate beetNombre As B4XViewPrivate beetDireccion As B4XViewPrivate bebutAfiliar As B4XViewPrivate bebutHelp As B4XViewPrivate bebutExit As B4XViewEndSub
Sub Activity_Create(FirstTime As Boolean)
'Do not forget to load the layout file created with the visual designer. For example:
Activity.LoadLayout("BuscarEmpresas")
EndSub
Sub Activity_ResumeLog("Activity_Resume")
CargarSpinnerCategorias
'EndSub
Sub Activity_Pause(UserClosed As Boolean)
EndSub
Sub beetNombre_EnterPressedEndSub
Sub beetDireccion_EnterPressedEndSub
Sub bebutHelp_ClickEndSub
Sub bebutExit_Click
Activity.Finish
EndSub
Sub bebutAfiliar_ClickEndSub
Sub be_b4x_Categorias_SelectedIndexChanged(Index As Int)
EndSub
Sub CargarSpinnerCategoriasDim lcList As List'
lcList.Initialize
lcList.Clear
'Log("CargarSpinnerCategorias")
Log(Starter.CursorCategorias.RowCount)
'For i = 0To Starter.CursorCategorias.RowCount-1
Starter.CursorCategorias.Position = i
lcList.add(Starter.CursorCategorias.GetString("categoria").Trim)
Next'
be_b4x_Categorias.SetItems(lcList)
be_b4x_Categorias.cmbBox.TextColor = Colors.Black
be_b4x_Categorias.cmbBox.DropdownBackgroundColor = Colors.White
be_b4x_Categorias.SelectedIndex = 0EndSub
Mi intención es que en el campo "beetNombre" cuando se muestre el "teclado" muestre una "tecla" llamada "Buscar"
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.