SQLite, combobox y input

[RuriNyan]

buenas tengo un problema con sqlite combobox y inputo cuando elijo un item del combo box siempre me da el precio y codigo del ultimo registro no se actualizar de acuerdo a lo que eliga espero que pueda ayudarme aqui dejos los codigos

on preload

Código: Seleccionar todo

function FillCombo()
	ComboBox.ResetContent("Lista1");
	tSeleccion = SQLite.QueryToTable(db,"SELECT * FROM Mercancias");
	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
		
	    	sRecordID = tSeleccion.Data[nRow]["RecordID"];
	    	sDescripcion = tSeleccion.Data[nRow]["Descripcion"];    	
	    	nBM = ComboBox.AddItem("Lista1", sDescripcion);
	    	    	
	    end
	end
end

combo box on select

Código: Seleccionar todo

tSeleccione = ComboBox.GetSelected("Lista1");

if tSeleccione then

nRow = String.ToNumber(ComboBox.GetItemData("Lista1", tSeleccione[1]));

    nRecordID = tSeleccion.Data[nRow]["RecordID"];
    sCodigo = tSeleccion.Data[nRow]["Codigo"];
    sDescripcion = tSeleccion.Data[nRow]["Descripcion"];
    sPUnitario = tSeleccion.Data[nRow]["PUnitario"];

    Input.SetText("inp_Codigo1", sCodigo)
    Input.SetText("inp_PUnitario1", sPUnitario)
end

[Agotaras123]

sSearch = ComboBox.GetText("ComboCliente");
if sSearch ~= "" then
		tblRS = SQLite.QueryToTable(db, "Select * from Clientes where  = Nombre '"..ComboBox.GetText("ComboCliente").."'")
		nLastError = Application.GetLastError();
		if nLastError ~= SQLite.OK then
			Dialog.Message("Error", SQLite.GetLastErrorString());
		end
		 
				if nLastError == SQLite.OK then
					for nRow = 1,tblRS.Rows do
		   		    	
			   		  nRecordID = tblRS.Data[nRow]["RecordID"];
						sCodigo = tblRS.Data[nRow]["Codigo"];
						sDomicilio = tblRS.Data[nRow]["Domicilio"];
						sPrecio = tblRS.Data[nRow]["Precio"];
						sRTN = tblRS.Data[nRow]["RTN"]
						
						Input.SetText("InpRTNCliente", sRTN)  
						Input.SetText("InpDireccion", sDomicilio);
						
						
						
		   
		  end
		  else
		     Dialog.TimedMessage("Alerta", "Este Nombre NO ESTA REGISTRADO", 3000, MB_ICONINFORMATION)
		 end
		end
			

[alexhunter111]

Los problemas con el combobox sqlite deben resolverse rápidamente.