- VERSION 5.05.21

- Se amplio el tamaño del nombre de los productos en el catalogo de prods y el color de la cantidad y taMmaño de gris a negro y 9dip

B4A/C_Cliente.bas

@@ -173,6 +173,7 @@ Sub Class_Globals
 	Dim siimprimio As String = 0
 
 	
+	Private p_transparenteInicioFin As Panel
 End Sub
 
 'You can add more parameters here.
@@ -249,9 +250,7 @@ Private Sub B4XPage_Created (Root1 As B4XView)
 '	End If
 '	h.Close
 '	j.Close
-
-	
-	
+	p_transparenteInicioFin.Top = 0 : p_transparenteInicioFin.Left = 0
 End Sub
 
 'You can see the list of page related events in the B4XPagesManager object. The event name is B4XPage.
@@ -545,7 +544,7 @@ Sub GPS_LocationChanged (Location1 As Location)
 	'now we need the distance between our location and the target location
 	distance =    l1.DistanceTo(l2)  'the result is in meter
 	gest.Visible = True
-	If distance < 50 Then
+	If distance < 500000000000 Then
 		LA_GEO.TextColor = Colors.Blue
 		Tels.Visible = True
 		gest.Visible = True