محاسبه حجم عکس انتخاب شده از گالری

[salar_blackdroid 408]

با سلام. توسط کد زیر عکس رو از گالری انتخاب می کنم.

Dim PicChooser As ContentChooser
    PicChooser.Initialize("PicChooser")
    PicChooser.Show("image/*", "یک عکس انتخاب کنید")

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

ولی نمیتونم سایز عکس رو محاسبه کنم.

 

دستور زیر مقدار صفر رو میده !!!!

File.Size(Dir,fileName)

چون تست کردم ، دیدم که پارامترهای Dir , filename تو رویداد PicChooser_Result اصلا بیانگر آدرس عکس نیست !!!

 

ممنون میشم کمک کنید ./

[امین شاهدی 5,765]

اول دقت کنین Dim PicChooser As ContentChooser رو توی ساب Globals بزارین و اگه آدرس رو درست برنمیگردونه از این ساب استفاده کن  :

Sub GetPathFromContentResult(UriString As String) As String
Try
  If UriString.StartsWith("/") Then Return UriString 'vaqti karbar file ro az filemanager entekhab kard

  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
  
  Catch
ToastMessageShow(LastException.Message,True)
End Try

آدرسی که ContentChooser بهت میده رو به این ساب بده تا آدرس درست رو بهت برگردونه (کدیه که خود ارل گفته برای ContentChooser ازش استفاده کنین)

 

کتابخونه ContentResolver و SQL رو هم تیک بزن

[salar_blackdroid 408]

مشکل اینه که در رویداد زیر :

Sub PicChooser_Result(Success As Boolean, Dir As String, FileName As String)
If Success = True Then
        Dim inp As InputStream
        inp = File.OpenInput(Dir, FileName)
        Dim btm As Bitmap
        btm.Initialize2(inp)
end if
end Sub

Dir و Filename آدرس عکس رو مشخص نمیکنن.

 

کارم گیره اینه !

 

ممنون میشم از راهنمایی تون ./

[salar_blackdroid 408]

امین جان ممنون از وقتی که گذاشتی.

 

آره این کد رو تو خود b4x دیدم ولی مشکلش اینه با کیت کت سازگار نیست !!! 

[امین شاهدی 5,765]

با کیت کت سازگاره (تست کردم)

، با Lolipop سازگار نیست که نیاز به دسترسی داره

[salar_blackdroid 408]

یعنی Permission اش رو بدیم حله تو Lolipop ؟

[امین شاهدی 5,765]

آره فکر کنم 4.4.4 هم بخواد اینو ،

 

توی منیفست این کد رو اضافه کن : 

AddPermission(android.permission.READ_EXTERNAL_STORAGE)