'B4J and B4A
Sub GetNativeCanvas (b4x As B4XCanvas) As Canvas
Dim jo As JavaObject = b4x
jo = jo.GetFieldJO("cvs")
If XUI.IsB4J Then Return jo.RunMethod("getObject", Null)
Return jo
End Sub
'B4J and B4A
Sub GetNativeCanvas (b4x As B4XCanvas) As Canvas
Dim jo As JavaObject = b4x
Return jo.GetFieldJO("cvs").RunMethod("getObject", Null)
End Sub