17/10/23 - Cambios para implementar los botones de mas y menos (No terminado)

This commit is contained in:
2023-10-17 19:43:42 -06:00
parent d87228a568
commit 9d15183c48
8 changed files with 779 additions and 83 deletions

View File

@@ -200,13 +200,14 @@ Private Sub B4XPage_Created (Root1 As B4XView)
l_ruta.Text = f.GetString("CAT_CL_RUTA")
f.Close
If l_ruta.Text = 0 Then
l_ruta.Text =0
l_ruta.Text = 0
Else
f=skmt.ExecQuery("select CAT_CL_RUTA from kmt_info")
f.Position=0
l_ruta.Text = f.GetString("CAT_CL_RUTA")
f.Close
End If
Starter.rutav = l_ruta.Text
If Cuantos = 0 Then
L_MONTOD.Text =0
l_cuantosc.Text = 0