SoloCodigo
Programación General => Visual FoxPro => Mensaje iniciado por: graluc en Sábado 5 de Febrero de 2011, 22:18
-
Hola,tengo un formulario de facturación con un combobox y un listbox. Quiero que al hacer click en el botón Comprar, los datos del producto seleccionado en el combo aparezcan el el listbox. todo bien menos el nombre que no aparece ¿que puse mal ? Acá mando parte del código. Gracias por su ayuda.
IF THISFORM.cboProducto.ListIndex=0
WAIT WIND "Seleccione el producto" TIMEOUT 2
ELSE
THISFORM.lstCompras.ADDITEM(THISFORM.cboProducto.value)
THISFORM.lstCompras.LIST(THISFORM.lstCompras.ListCount,2)=PADR(ALLTRIM(THISFORM.cboProducto.Text),40) THISFORM.lstCompras.LIST(THISFORM.lstCompras.ListCount,3)=PADL(ALLTRIM(THISFORM.txtCantidad.value),6)
THISFORM.lstCompras.LIST(THISFORM.lstCompras.ListCount,4)="$ " + STR(THISFORM.txtPrecio.value,8,2)
m.total=m.total+ VAL(THISFORM.txtCantidad.value) * THISFORM.txtPrecio.value
THISFORM.REFRESH
ENDIF
THISFORM.cboProducto.SETFOCUS