Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Ayuda Con Funcion
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Ayuda Con Funcion 
 
Buenas Amigos Foreros, estoy tratando de validar varios combox a la ves y pues para eso necesito de su ayuda... estoy tratando de hacerlo por medio de una funcion, tengo 5 combox con diferentes valores y al momento de precionar un boton que me valide todos los 5 combox

PUBLIC SUB Button2_Click()
  DIM i AS Integer

  FOR i = 1 TO 5
    validar_combos("ComboBox" + i) 'lo que quiero hacer es que lo haga automaticamente para cada combo mediante un ciclo
  NEXT

END
 


y pues en realidad no se como declarar la variable o como pasar el nombre del combo que quiero utilizar para validar

FUNCTION validar_combos(t AS String)
  
  DIM combos AS NEW ComboBox(t)
  
  Message.Info(combos.Text)
  
END
 


espero me entiendan y puedan ayudar...! e intentado de muchas maneras pero no he podido
 



 
jesusdaredevil - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Ayuda Con Funcion 
 
Hola Jesús.

A ver, no voy a darte la pista completa. Pero si una ayuda.
Es un ejemplo que hemos visto en la comunidad. Tienes que adaptarlo a los combobox.

Imagina que tienes en un formulario un numero x de cajas de textos y quieres borrar el contenido de todas estas
cajas de textos.Necesitaras x cajas de texto y un botón de comando para limpiar el contenido.


PUBLIC SUB Button1_Click()
  DIM cajatexto AS Object
  
  FOR EACH cajatexto IN FormCajaTexto.Controls
    IF cajatexto IS TextBox THEN cajatexto.text = ""
  NEXT
  
END

 


En vez de declarar la variable como combobox, declárala como objeto.Juega con el for each dentro de la función.
No olvides la propiedad controls de tu formulario.Fíjate que si cambias el tipo de la variable cajatexto a textbox no funciona.

Espero que este ejemplo te motive para acabar tu ejemplo.

Saludos
 




===================
Gambas Básico
"No es un bug, es una característica no documentada"
 
última edición por Shell el Lunes, 22 Agosto 2011, 08:13; editado 1 vez 
Shell - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Ayuda Con Funcion 
 
Hola,

Algo parecido:

PRIVATE combos AS NEW Object[]

'Cuando los creas los metes dentro del objeto. Por ejemplo:

PUBLIC SUB Form_Open()
    combos.Add(ComboBox1)
    combos.Add(ComboBox2)
END


PUBLIC SUB Button1_Click()
    DIM combito AS ComboBox
    FOR EACH combito IN combos
        if  valida_combo(combito)=False THEN
            Message.Error("ESTO ES UNA TRAGEDIA")
            BREAK
        ENDIF
    NEXT
END




PUBLIC FUNCTION valida_combo(combo AS ComboBox) AS boolean
            'el algoritmo de validación que quieras
END

 


Saludos
 



 
última edición por ljma el Lunes, 22 Agosto 2011, 22:20; editado 1 vez 
ljma - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Error En Funcion Matematica Agamenon General 1 Martes, 13 Marzo 2012, 02:19 Ver último mensaje
razaAztk
No hay nuevos mensajes Ayuda Con Una Funcion De Consulta A Base D... aratar79 Bases de Datos 4 Viernes, 31 Agosto 2012, 01:53 Ver último mensaje
aratar79
No hay nuevos mensajes Gambas3.4(Casi).Ventana De Ayuda Y Ayuda O... Shell Instalación 3 Martes, 22 Enero 2013, 00:23 Ver último mensaje
Shell
No hay nuevos mensajes Funcion Scan Shell General 13 Miercoles, 29 Octobre 2014, 13:10 Ver último mensaje
vuott
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario



  

 

cron