• Martes 19 de Marzo de 2024, 06:32

Autor Tema:  Combobox  (Leído 2076 veces)

solracnauj21

  • Nuevo Miembro
  • *
  • Mensajes: 1
    • Ver Perfil
Combobox
« en: Lunes 28 de Marzo de 2011, 20:31 »
0
Hola soy algo novato con fox pro y tengo un sistema que modificar, mi primer problema esta con estos combobox

tengo dos combo box
Que los relleno mediante una consulta a una tabla de la siguiente manera

Select distinc(plazo)plazo From montos Where monto>0 And prestamo>0 into cursor rta         
         select rta
         go top
         thisform.ctprestamo.cmbplazo.value=ALLTRIM(str(rta.plazo))
         Do While !EOF()
            ThisForm.ctprestamo.cmbplazo.additem(ALLTRIM(str(rta.plazo)))
            Skip
         EndDo

Con esto relleno muy bien mi combobox pero si aplico en Style =2  a lista desplegable me sale bien solo que me seleccion el primer valor y me lo duplica es decir
Cuando se ejecuta me hace lo siguiente
 en el combo me aparece 10  y abajo la siguiente lista
10
20
30
40

Pero cuando selecciono alguno de los valores me quita el ultimo elemento dejandomelo asi
10
10
20
30
y si cambio mi Style = 0  a cuadro desplegable  al inicio no selecciona nada y en la  lista me aparece completa  y si selecciono alguno no me quita ningun valor
pero el detalle es que esta opcion esta libre de edicion y yo preferiria que fuese con la lista desplegable.

Alguna idea del por que de esto ?

Gracias de antemano!