2 combobox en un mismo form

Necesito poner dos combobox en un mismo form, pero no puedo

En el init del combo1 tengo esto

SELECT codigo, descrip FROM D:\prueba\TDES INTO CURSOR ctdes
thisform.combo1.BoundColumn =2
thisform.combo1.BoundTo= .T.
thisform.combo1.RowSourceType= 6
thisform.combo1.RowSource="ctdes"
thisform.combo1.Style= 2
thisform.combo1.FontSize = 8
thisform.combo1.Refresh

Si este es el unico combo en el form se visualiza perfecto

Pero al agregar el 2do combobox y poniendo el mismo codigo en el init de combo2

SELECT pago FROM D:\prueba\TPAGO INTO CURSOR ctpago
thisform.combo1.BoundColumn =2
thisform.combo1.BoundTo= .T.
thisform.combo1.RowSourceType= 6
thisform.combo1.RowSource="ctpago"
thisform.combo1.Style= 2
thisform.combo1.FontSize = 8
thisform.combo1.Refresh

El combo 2 queda vacio y en el combo1 visualizo los datos del cursot ctpago en lugar de ctdes.

Si me dan una mano se los agradezco

1 respuesta

Respuesta

Al parecer en la parte del código del combo2 haces referencia nuevamente al combo1, en realidad no le envías nada al combo2

Prueba

SELECT pago FROM D:\prueba\TPAGO INTO CURSOR ctpago
thisform.combo2.BoundColumn =2
thisform.combo2.BoundTo= .T.
thisform.combo2.RowSourceType= 6
thisform.combo2.RowSource="ctpago"
thisform.combo2.Style= 2
thisform.combo2.FontSize = 8
thisform.combo2.Refresh

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas