Ayuda con Combobox y Select
Publicado por Anibal (25 intervenciones) el 06/02/2020 17:37:45
Saludos, de antemano muchas gracias por su atención
Tengo un formulario destinado a realizar una recepción de equipos...
mi intención es cargar un Combo Box con un listado de equipos (Impresoras, Monitores, Impresoras, etc) para ello en el Init del formulario hago esto:
hasta alli perfecto, la idea es al seleccionar por ejemplo Impresora, se me cargue el siguiente combobox (Marcas) con la lista de marcas de impresoras (epson, hp, citizen, etc), para lo cual en el evento valid del combobox de equipos hago esto:
de hecho lo hace, carga la información el problema que evidencio es que cuando trato de volver a cliquear sobre el combobox equipos pues me da error
al hacerlo en el evento Valid de este objeto no puedo volver a seleccionar otro equipo, y si lo hago en el evento click pues tambien el comportamiento del formulario no me convence, bien sabré agradecer sus buenos oficios al respecto,
igualmente los cursores creados siguen con la información consultada, al cerrar el formulario es decir sigue en memoria los datos del select
gracias
Tengo un formulario destinado a realizar una recepción de equipos...
mi intención es cargar un Combo Box con un listado de equipos (Impresoras, Monitores, Impresoras, etc) para ello en el Init del formulario hago esto:
1
2
3
4
5
SELECT equipos
thisform.cmbEquipos.Value = equipos.cod_equipo
SCAN
thisform.cmbEquipos.AddItem (equipos.nom_equipo)
ENDSCAN
hasta alli perfecto, la idea es al seleccionar por ejemplo Impresora, se me cargue el siguiente combobox (Marcas) con la lista de marcas de impresoras (epson, hp, citizen, etc), para lo cual en el evento valid del combobox de equipos hago esto:
1
2
3
4
5
6
7
8
9
10
11
12
CodigoEquipo = thisform.cmbEquipos.Value
SELECT cod_marca, nom_marca FROM marcas WHERE cod_Equipo = CodigoEquipo INTO CURSOR ListMarcas readwrite
SELECT ListMarcas
Thisform.cmbMarcas.Value = ListMarcas.cod_marca
CodigoMarca = Thisform.cmbMarcas.Value
SCAN
thisform.cmbMarcas.AddItem (ListMarcas.nom_marca)
ENDSCAN
thisform.cmbMarcas.SetFocus
de hecho lo hace, carga la información el problema que evidencio es que cuando trato de volver a cliquear sobre el combobox equipos pues me da error
al hacerlo en el evento Valid de este objeto no puedo volver a seleccionar otro equipo, y si lo hago en el evento click pues tambien el comportamiento del formulario no me convence, bien sabré agradecer sus buenos oficios al respecto,
igualmente los cursores creados siguen con la información consultada, al cerrar el formulario es decir sigue en memoria los datos del select
gracias
Valora esta pregunta


0