نمایش پروگرس بار در نوتیفیکیشن

[alirezakazemizaroomi 437]

سلام

من یه پروگرس بارو با تایمر مچ کردم؛که هرثانیه پروگرس بار یک درصد جلو میره

کدام اینطوری:

Sub Activity_Create(FirstTime As Boolean)
    timer2.Initialize("Timer2",7)
    timer2.Enabled=True
a=1
end sub
Sub Timer2_Tick
ProgressBar1.Progress = a
    a = a + 5
    If a > 100 Then
    timer2.Enabled = False
    End If
End Sub

 حالا میخوام این  پروگرس بارو بیارم تو نوتیفیکیشن نشون بدم ، کداش چطوری میشه؟

[پژمان نیکروان 6,055]

سلام.

با کتابخانه NotificationBuilder میتونی توی نوتیفیکشن پراسز نشون بدی دیگه.

یعنی کدهات به این صورت میشه کلا.

Sub Globals
Dim n As NotificationBuilder
End Sub

Sub Activity_Create(FirstTime As Boolean)
    timer2.Initialize("Timer2",7)
    timer2.Enabled=True
a=1
End Sub
Sub Timer2_Tick

ProgressBar1.Progress = a

n.setProgress(100,a,False) 'جای 100 ، مکس پراسزبارتو بذار'
n.Notify(1)

    a = a + 5
    If a > 100 Then
    timer2.Enabled = False
    End If
End Sub

جای 100 ، عددی که به max پراگسزبارت دادی بذار.