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

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