رفتن به مطلب
بیسیک فور ایکس
H@mid.RS

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

Recommended Posts

درود


همونطور که شما می دونید به هر دلیلی نیاز داریم که یک فایل رو باز کنیم


حالا اگه عکس باشه برای نمایش ان


یا موزیک باشه برای پخش


برای این کار نیاز به کتابخانه های زیر داریم :



'*.ContentChooser
'*.SQL
'*.Phone

تعریف یک کانتنت :(مکانشم می گم کجا باشه که بدونید)



Sub Process_Globals
Private cc As ContentChooser
End Sub


Sub Activity_Create(FirstTime As Boolean)
cc.Initialize("cc")
End Sub

برای فراخوانی و انتخاب یه باتن نیاز داریم که کد زیرو کپی کنیدش داخل:



Sub b_Click
cc.Show("*/*", "Choose image")
End Sub


Sub GetPathFromContentResult(UriString As String) As String
If UriString.StartsWith("/") Then Return UriString
Dim Cursor1 As Cursor
Dim Uri1 As Uri
Dim Proj() As String = Array As String("_data")
Dim cr As ContentResolver
cr.Initialize("")
If UriString.StartsWith("content://com.android.providers.media.documents") Then
Dim i As Int = UriString.IndexOf("%3A")
Dim id As String = UriString.SubString(i + 3)
Uri1.Parse("content://media/external/images/media")
Cursor1 = cr.Query(Uri1, Proj, "_id = ?", Array As String(id), "")
Else
Uri1.Parse(UriString)
Cursor1 = cr.Query(Uri1, Proj, "", Null, "")
End If
Cursor1.Position = 0
Dim res As String
res = Cursor1.GetString("_data")
Cursor1.Close
Return res
End Sub

دستورات بالا برای گرفتن مسیر عکس ها هست ولی چون من در قسمت انتخاب داخل باتن * گذاشتم دیگه همه فایل ها رو از همه برنامه ها می تونید انتخاب کنید.


 


و در نهایت می موند دریافت نتیجه انتخاب :



Sub Choose_Result (Success As Boolean, Dir As String, FileName As String)
If Success Then
dim basic4x as string
basic4x=GetPathFromContentResult(FileName)
ToastMessageShow("انتخاب فایل با موفقیت انجام شد.",False)
Else
ToastMessageShow("مشکل در انتخاب فایل",False)
End If
End Sub

خوب در نهایت میاد مسیر رو توی رشته Basic4X قرار میده و ما می تونیم هر جا نیاز داشتیم ازش استفاده کنیم


 


سوالی بود در خدمتم


در پناه حق


به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

  • مطالب مشابه

    • توسط amir386
      سلام خدمت اساتید عزیز ! همونطور که میدونین مدتیه که تلگرام هیتلر شده و من بسیاری از برنامه هام شاید بیشتر از 15 تاش ارتباط مستثیم و غیر مستقیم با تلگرام و api هاش دارن ! که خیلی وقته از کار افتادن و کاربر حتما باید به قندشکن وصل باشه! اما سوال اصلی من اینه بهترین راه برای دور زدن هیتلر داخل برنامه چیه! چند نقری گفتن که به سرور وصل کنم و از اونجا بهتلگرام . ولی من میخوام مثل برنامه هایی مثل تلگرام طلایی و هاتگرام و... از تونل پراکسی داخل برنامه استفاده کنم ! کسی بلده و یا راهکاری واسم داره!؟ خیلی ممنون❤️
    • توسط batman1
      سلام خدمت تمامی دوستان.
      کسی تا به حال تونسته توی بیسیک فور اندروید،نرم افزار دوربین مخفی بسازه؟
      یعنی این که برنامه رو اجرا کنه، بعد برنامه خودش بسته شه و شروع به فیلم برداری با دوربین جلو کنه.
      با توجه به این که دوربین نیاز به یک پنل داره و توی سرویس هم نمیشه پنل رو به اون شکل تعریف کرد،تقریبا این کار نشدنیه.
      ممنون میشم راهنماییم کنید.
    • توسط batman1
      سلام به همه.
      دوستان،من با استفاده از کتابخانه SHCamera عکس گرفتم.
      منتها دوتا مشکل دارم
      یکی میخوام این عکسی که داخل پنل هست رو به داخل یه ایمیج ویو انتقال بدم
      یکی میخوام کاربر بتونه تصویری که دوربین داخل پنل مینداره رو زمانی که دوربین داره کار میکنه،بزرگ نمایی کنم.
      خیلی گشتم
      چیزی پیدا نکردم
      ممنون میشم راهنماییم کنید.
×