Dim m1 As Marker = GoogleMap1.AddMarker3(Latitude, Longitude , i, getMarkerIcon(col))
Public Sub getMarkerIcon(Color As String) As Bitmap
Dim NativeMe As JavaObject
NativeMe.InitializeContext
Return NativeMe.RunMethod("getMarkerIcon", Color)
End Sub
#If Java
import android.graphics.Color;
import com.google.android.gms.maps.model.BitmapDescriptorFactory;
import com.google.android.gms.maps.model.BitmapDescriptor;
public BitmapDescriptor getMarkerIcon(String color) {
float[] hsv = new float[3];
Color.colorToHSV(Color.parseColor(color), hsv);
return BitmapDescriptorFactory.defaultMarker(hsv[0]);
}
#End If