Correcciones y cambios en vistas version 4.08.17

This commit is contained in:
cvaldes1201
2024-08-17 16:19:32 -06:00
parent 5f6d16fba0
commit ea31fd4801
17 changed files with 47 additions and 7 deletions

View File

@@ -49,6 +49,8 @@ Sub Class_Globals
Private b_prodMasC As Button
Private p_botMasMenC As Panel
Private p_botMasMen As Panel
Private l_cajas As Label
Private l_piezas As Label
End Sub
'You can add more parameters here.
@@ -425,6 +427,7 @@ Sub CreateListItem(Text As String, precioU As String, inv As Int, inv2 As Int, W
l_pCant.BringToFront
et_pCant.SendToBack
p_botMasMenC.Visible = False
l_cajas.Visible = False
' i_prod.Bitmap = img
Return p
End Sub
@@ -455,6 +458,7 @@ Sub CreateListItem2(Text As String, precioU As String, inv As Int, inv2 As Int,
l_pCantC.BringToFront
et_pCantC.SendToBack
p_botMasMen.Visible = False
l_piezas.Visible = False
' i_prod.Bitmap = img
Return p
End Sub