Sub Process_Globals
Private session As JavaObject
End Sub
Sub Service_Create
Dim context As JavaObject
context.InitializeContext
session.InitializeNewInstance("android.media.session.MediaSession", Array(context, "tag"))
Dim cb As JavaObject
cb.InitializeNewInstance(Application.PackageName & ".starter.MyCallback", Null)
session.RunMethod("setCallback", Array(cb))
session.RunMethod("setFlags",Array(3))
session.RunMethod("setActive", Array(True))
End Sub
Sub Service_Start (StartingIntent As Intent)
End Sub
'Return true to allow the OS default exceptions handler to handle the uncaught exception.
Sub Application_Error (Error As Exception, StackTrace As String) As Boolean
Return True
End Sub
Sub Service_Destroy
session.RunMethod("release",Null)
End Sub
Sub Media_OnCommand(Command As String)
Log(Command)
End Sub
Sub Media_OnButton(Intent As Object)
Log(Intent)
End Sub
#if java
import android.media.session.MediaSession.*;
import android.os.Bundle;
import android.os.ResultReceiver;
import android.content.Intent;
public static class MyCallback extends Callback {
public MyCallback() {
}
public void onCommand(String command, Bundle args, ResultReceiver cb) {
BA.Log(command);
processBA.raiseEventFromUI(null, "media_oncommand", command);
}
public boolean onMediaButtonEvent(Intent mediaButtonIntent) {
processBA.raiseEvent(null, "media_onbutton", mediaButtonIntent);
return false;
}
}
#end if