Sub Process_Globals
Private NativeMe As JavaObject
End Sub
Sub Globals
End Sub
Sub Activity_Create(FirstTime As Boolean)
If FirstTime Then
NativeMe.InitializeContext
End If
Dim s As String = NativeMe.RunMethod("getAndroidVersion", Null)
Log(s)
End Sub
Sub Activity_Resume
End Sub
Sub Activity_Pause (UserClosed As Boolean)
End Sub
#If JAVA
public String getAndroidVersion() {
String release = android.os.Build.VERSION.RELEASE;
int sdkVersion = android.os.Build.VERSION.SDK_INT;
return "Android SDK: " + sdkVersion + " (" + release +")";
}
#End If