Datos en ListBoxEx
Publicado: 08 Dic 2013 02:05
Hola buenas noches a todos mi duda es la siguiente:
Estoy creando un programa en el cual tengo una ListBoxEx, cargo los datos en la ListBoxEx y solo me muestra un item de la tabla y los demas datos me los pega en las input, pero lo que quiero que en la ListBoxEx me aparezca en fila 3 o 2 datos de mi tabla.
Aqui les dejare el script de mi programa,
Saludos
Estoy creando un programa en el cual tengo una ListBoxEx, cargo los datos en la ListBoxEx y solo me muestra un item de la tabla y los demas datos me los pega en las input, pero lo que quiero que en la ListBoxEx me aparezca en fila 3 o 2 datos de mi tabla.
Aqui les dejare el script de mi programa,
Saludos
Input.SetText("InpProducto", "")
Input.SetText("InpCodigo", "")
Input.SetText("InpModelo", "")
Input.SetText("InpCantidad", "")
Input.SetText("InpFecha", "")
ListBoxEx.DeleteAllItems("Listado")
tSeleccion = SQLite.QueryToTable(db, "SELECT Producto FROM Productos Order By RecordID ASC");
nLastError = Application.GetLastError();
if nLastError ~= SQLite.OK then
Dialog.Message("Error", SQLite.GetLastErrorString());
end
if nLastError == SQLite.OK then
for nRow = 1,tSeleccion.Rows do
nRecordID = tSeleccion.Data[nRow]["RecordID"];
sProducto = tSeleccion.Data[nRow]["Producto"];
sCodigo = tSeleccion.Data[nRow]["Codigo"];
sModelo = tSeleccion.Data[nRow]["Modelo"];
sCantidad = tSeleccion.Data[nRow]["Cantidad"];
sFecha = tSeleccion.Data[nRow]["Fecha"];
nIndex = ListBoxEx.AddItem("Listado", "<b>"..sProducto.."</b>", sProducto, nRow, "", 1, LBXITEM_HTML, 0, nil, {2088673,2004590,2005389}, nil);
ListBoxEx.SetItemGStyle("Listado", nIndex, BACKWARD_DIAGONAL, LBXISTATE_NORMAL);
ListBoxEx.SetItemIconSize("Listado", nIndex, 20);
ListBoxEx.SetUpdate("Listado", true);
end
end