|   FOROS      |     Tutoriales    |     KIO4 |      
   Inicio B4A (Basic4Android) App inventor 2 Arduino
   Elastix - VoIP Cosas de Windows Webs interesantes  Telecomunicaciones

 


Nuevo concurso para España, Argentina, Brasil, Chile, Colombia, Ecuador, México, Perú y Portugal.

Nueva sección en esta web: Elastix - VoIP

¿Qué es esto?

- Monta un servidor telefónico en tu ordenador para poderte comunicar mediante tu móvil con otros móviles que estén en tu red Wifi. Parecido a Skipe o Whatsapp-teléfono, pero en este caso tú controlas al servidor.

- Si sabes abrir puertos del router, también puedes comunicarte con tu móvil de una red Wifi a teléfonos de otra red Wifi.

- También puedes comunicarte con teléfonos "normales", pero para eso necesitas un dispositivo que vale unos 60 €.

- Es muy recomendable aprender el funcionamiento de este servidor telefónico Asterisk-Elastix.

 Elastix - VoIP

 

B4A en español - Juan Antonio Villalpando
(BASIC4Android)

-- Tutorial de B4A --

Volver al índice del tutorial                    Return to index tutorial

____________________________

Basic4Android.

41.- Focus.

Tutoriales. Focus.

Presentación

Focus es el control que se encuentra preparado para recibir un evento por parte del usuario, hacer un click, escribir algo,...

 

Este ejemplo consta de un Layout llamado focoeditext, con dos Label y dos EditText (lb1, lb2, Alf_1 y Alf_2).

Los EditText tienen (otros View también lo tienen) un evento llamado FocusChanged, que detecta si ha cambiado el Foco.

La variable HasFocus indica si el foco ha cambiado o no, mediante True y False.

Alf_1.RequestFocus significa que requiere el Focus.

Este programa de ejemplo, obliga a que primero escribas el Nombre y después el Apellido.

Si te ubicas en el Apellido y no has puesto el Nombre, sale un Msgbox, solicitando que escribas el Nombre y
el Focus se pone en el casillero del Nombre.

Ejemplo de Focus.
'Activity module
Sub Process_Globals
    ' Juan Antonio Villalpando
    ' juana1991@yahoo.com

End Sub

Sub Globals
    Dim lb1,lb2 As Label 
    Dim Alf_1, Alf_2 As EditText 
End Sub

Sub Activity_Create(FirstTime As Boolean)
    Activity.LoadLayout("focoeditext")
    Alf_1.RequestFocus 
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub Alf_1_FocusChanged (HasFocus As Boolean)
 If HasFocus=False AND Alf_1.Text="" Then 
 Msgbox("Debe de rellenar el Nombre","Error")
 End If              
End Sub

Sub Alf_2_FocusChanged (HasFocus As Boolean)

If HasFocus=True AND Alf_1.Text="" Then Alf_1.RequestFocus         
End Sub






 


________________________________

Si quieres que este tutorial se mantenga y lo actualice con más programas, escríbeme un correo a Juan Antonio: juana1991@yahoo.com

- Mi correo:
juana1991@yahoo.com
- KIO4.COM - Política de cookies. Textos e imágenes propiedad del autor:
© Juan A. Villalpando
No se permite la copia de información ni imágenes.
Usamos cookies propias y de terceros que entre otras cosas recogen datos sobre sus hábitos de navegación y realizan análisis de uso de nuestro sitio.
Si continúa navegando consideramos que acepta su uso. Acepto    Más información