لیست کردن موزیک

[MR.B4A 125]

سلام.

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

[MR.B4A 125]

ممنون میشم جواب منو بدید

[محمدرضا شاهپیری 5,582]

سلام و درود. تو بیسیک فک کنم با content chooser بشه. در کل نیاز به یه کتابخونه اختصاصی هست برای کارهای پیشرفته تر.

Sub Process_Globals
   Dim cc As ContentChooser

End Sub
Sub Globals

End Sub

Sub Activity_Create(FirstTime As Boolean)
   If FirstTime Then
      cc.Initialize("CC")
   End If
   cc.Show("audio/*", "Choose audio file")
End Sub
Sub CC_Result (Success As Boolean, Dir As String, FileName As String)
   
End Sub

 

[MR.B4A 125]

این سورس خوبی برای لیست کردن آیتم های حافظه داخل برنامه هست:

https://biaupload.com/do.php?filename=org-dfd2951217311.rar