Spanish ¿Hay alguna forma de mostrar la barra de progreso de la canción en la notificación?

[Jhohan]

Hola, ¿cómo puedo mostrar la barra de progreso útilizando la librería NB6?, Tengo este código para notificaciones, pero no se visualiza la barra de progreso:

Private Sub UpdateNotification
    Dim nb As NB6
    nb.Initialize("music_player_channel", "Music Player", "DEFAULT")
  
    Dim ContentTitle As String = NombreDeCancion
    Dim ContentText As String = NombreDeArtista

    Dim icPlay As Bitmap = LoadBitmap(File.DirAssets, "play.png")
    Dim icPause As Bitmap = LoadBitmap(File.DirAssets, "pause.png")
    Dim icNext As Bitmap = LoadBitmap(File.DirAssets, "next.png")
    Dim icPrev As Bitmap = LoadBitmap(File.DirAssets, "prev.png")

    nb.AddButtonAction(icPrev, "Anterior", Me, ACTION_PREV)
    If Playing Then
        nb.AddButtonAction(icPause, "Pausa", Me, ACTION_PAUSE)
    Else
        nb.AddButtonAction(icPlay, "Reproducir", Me, ACTION_PLAY)
    End If
    nb.AddButtonAction(icNext, "Siguiente", Me, ACTION_NEXT)
  
    Dim notification As Notification = nb.Build(ContentTitle, ContentText, "music_tag", Main)
    ' Configurar la barra de progreso
    Dim duration As Long = Player.Duration
    Dim position As Long = Player.Position
    If duration > 0 And position >= 0 And position <= duration Then
        Dim progress As Int = (position * 100) / duration
        nb.Progress(progress, 100, False)
    Else
        nb.Progress(0, 100, True)
    End If

    nb.MediaStyle
    nb.Ongoing(True)

    Dim NotificationManager As JavaObject
    NotificationManager.InitializeContext
    NotificationManager = NotificationManager.RunMethod("getSystemService", Array("notification"))
    NotificationManager.RunMethod("notify", Array(NotificationId, notification))
End Sub

 

[josejad]

Hola:

No lo he probado nunca, pero echa un ojo a este post

Notification with NB6 and progressbar

Hello, how can I update the progressbar in a notification that was built with NB6? Thanks

www.b4x.com