Sub SetNowPlayingInfo(Title As String, Artist As String, AlbumTitle As String)
Dim Infos As Map
Infos.Initialize
Infos.Put("title",Title)
Infos.Put("artist",Artist)
Infos.Put("albumTitle",AlbumTitle)
Dim NaObj As NativeObject = Me
NaObj.RunMethod("SetInfos:",Array(Infos.ToDictionary))
End Sub
#if objc
@import MediaPlayer;
-(void)SetInfos:(NSMutableDictionary*)Dictionary{
[[MPNowPlayingInfoCenter defaultCenter] setNowPlayingInfo:Dictionary];
[[UIApplication sharedApplication] beginReceivingRemoteControlEvents];
}
#end if