Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Eventos En ComboBox
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Eventos En ComboBox 
 
Tengo un control ComboBox1 en el que selecciono un cliente (empresa) y otro ComboBox2 en el que debo seleccionar un nombre de contacto correspondiente dicha empresa seleccionada en ComboBox1. Lógicamente necesito capturar cuando estoy manejando combobox2 para poder hacer la correspondiente búsqueda en la base de datos y representar los elementos filtrados en dicho combobox.

Para ello me vendría bien poder captar el momento en que despliego el combobox2, pero no se que evento es este. En la ayuda de gambas veo que combobox tiene estos eventos:

Activate
Change  
Click  
DblClick  
Drag  
DragMove  
Drop  
Enter  
GotFocus  
KeyPress  
KeyRelease  
Leave  
LostFocus  
Menu  
MouseDown  
MouseDrag  
MouseMove  
MouseUp  
MouseWheel  

¿alguno de ellos corresponde a desplegar el combobox?. Hasta ahora lo estoy resolviendo con un DblClick pero me parece una chapuza.

Gracias de antemano.
 



 
jsoto61 - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Eventos En ComboBox 
 
Hola

Pongamos que tu quieres que al entrar en un formulario, se rellene un combo con todos tus clientes. Para ello miras en tu tabla de clientes y haces esto al cargar el form

sub form_open
Dim Cn as new connection, Rs as Result

Cn=Conectar() 'aquí llamas a una rutina que asegura que tras ello tienes la conexión establecida
Rs=Cn.exec("select nombre from clientes order by nombre") 'creas un recordset con los nombres que quieres

Do while Rs.available 'aquí llenas el combo
   combo1.add(Rs!nombre)
   Rs.movenext
loop
end


Ahora queremos hacer que al elegir un cliente se llene un combo2 con los diversos datos de contacto de ese cliente
sub Combo1_Click 'al elegir un cliente
Dim Cn as new connection, Rs as Result

Cn=Conectar() 'aquí llamas a una rutina que asegura que tras ello tienes la conexión establecida
Rs=Cn.exec("select contacto from clientes where nombre='" & combo1.text & "' order by contacto") 'creas un recordset con los contactos de ese cliente

Do while Rs.available 'aquí llenas el combo
   combo2.add(Rs!nombre)
   Rs.movenext
loop
end
  

Ya para dejar este tema, alguna vez te puedes encontrar con la situación de que quieras extraer por ejemplo los clientes de tu tabla de facturas. El problema es que allí el mismo cliente puede estar repetido varias veces. En esos casos utilizas la claúsula distinct para evitar que el mismo nombre aparezca varias veces en el combo.

Rs=Cn.exec("select DISTINCT nombre from clientes order by nombre") 'creas un recordset con los nombres que quieres


Un saludo
 
 



 
soplo - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Eventos En ComboBox 
 
Si señor, muchísimas gracias.

A veces tenemos la solución delante y no somos capaces de verla. Un millón de gracias.
 



 
jsoto61 - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes ComboBox En Gambas... chicogambas2 Controles/Librerías/Componentes 6 Miercoles, 20 Enero 2010, 15:32 Ver último mensaje
CHIKILICUATRE
No hay nuevos mensajes ComboBox En Gambas [EDIT]... chicogambas2 Aplicaciones/Fragmentos de Código 3 Lunes, 31 May 2010, 08:42 Ver último mensaje
shordi
No hay nuevos mensajes ComboBox De Pobre didier18 Aplicaciones/Fragmentos de Código 2 Lunes, 23 Junio 2014, 07:48 Ver último mensaje
didier18
No hay nuevos mensajes TextBox Y ComboBox alberto_moyano Controles/Librerías/Componentes 4 Sabado, 22 Noviembre 2014, 09:19 Ver último mensaje
shordi
 

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