Hola a todos,
Estoy teniendo problemas al inicializar Google Maps en mi aplicación B4A. El siguiente código intenta obtener el mapa, pero no se inicializa correctamente a menos que use un punto de interrupción.
Sub Globals
Dim mFragment As MapFragment
Dim gmap As GoogleMap
Dim MapPanel As Panel
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("prueba4") ' Cargar el diseño que contiene el MapFragment
MapPanel.Initialize("")
Activity.AddView(MapPanel, 0, 0, 100%x, 100%y)
If mFragment.IsGooglePlayServicesAvailable = False Then
ToastMessageShow("Google Play services not available.", True)
Else
mFragment.Initialize("Map", MapPanel)
End If
End Sub
Sub Map_Ready
Log("map ready")
gmap = mFragment.GetMap
If gmap.IsInitialized = False Then
ToastMessageShow("Error initializing map.", True)
Else
'gmap.AddMarker(36, 15, "Hello!!!")
gmap.AddMarker3(36,15, "yo", LoadBitmap(File.DirAssets, "ic_person128.png"))
Dim cp As CameraPosition
cp.Initialize(36, 15, gmap.CameraPosition.Zoom)
gmap.AnimateCamera(cp)
End If
End Sub
Sub Activity_Resume
End Sub
Sub Activity_Pause (UserClosed As Boolean)
End Sub
He probado varios enfoques, incluyendo el uso de un Timer y un Handler, pero el problema persiste. Estoy utilizando B4A, vversión 12.50.
Cualquier ayuda sería apreciada.