B4A Library [Library] B4aGridView v3.80

lonleystar · Jan 8, 2013

Hi guys, B4AGridView is updated to v3.70.

1: GridView Demo
1: Library
1: PDF Explanations

A big thanks goes to ( Sergey Tarasevich - author of Universal Image Loader )

A thanks is always appreciated.

B4AGridView
Author: Giuseppe Salvi
Version: 3.7

Fields:
- Default As Typeface
  The default NORMAL typeface object.
- Default_Bold As Typeface
  The default BOLD typeface object.
- Monospace As Typeface
  The NORMAL style of the default monospace typeface.
- Sans_Serif As Typeface
  The NORMAL style of the default sans serif typeface.
- Serif As Typeface
  The NORMAL style of the default serif typeface.
- Style_Bold As Int
  The default BOLD style int.
- Style_Bold_Italic As Int
  The default BOLD ITALIC style int.
- Style_Italic As Int
  The default ITALIC style int.
- Style_Normal As Int
  The default NORMAL style int.
Methods:
- LoadFontFromAssets (file As String) As Typeface
  Create a new typeface from the specified font data from assets.
- LoadFontFromFile (file As String) As Typeface
  Create a new typeface from the specified font data from sdcard.
Fields:
- Center As ScaleType
  Center the image in the view, but perform no scaling.
- Center_Crop As ScaleType
  Scale the image uniformly (maintain the image's aspect ratio) so that both dimensions (width and height) of the image
  will be equal to or larger than the corresponding dimension of the view (minus padding).
- Center_Inside As ScaleType
  Scale the image uniformly (maintain the image's aspect ratio) so that both dimensions (width and height) of the image
  will be equal to or less than the corresponding dimension of the view (minus padding).
- Fit_Center As ScaleType
  Scale the image using CENTER.
- Fit_End As ScaleType
  Scale the image using END.
- Fit_Start As ScaleType
  Scale the image using START.
- Fit_XY As ScaleType
  Scale the image using FILL.
- Matrix As ScaleType
  Scale using the image matrix when drawing.
Fields:
- CARDS As Int
  CARDS Effect = 2
- CURL As Int
  CURL Effect = 3
- FADE As Int
  FADE Effect = 12
- FAN As Int
  FAN Effect = 9
- FLIP As Int
  FLIP Effect = 5
- FLY As Int
  FLY Effect = 6
- GROW As Int
  GROW Effect = 1
- HELIX As Int
  HELIX Effect = 8
- PUZZLE As Int
  PUZZLE Effect = 16
- REVERSE_FLY As Int
  REVERSE_FLY Effect = 7
- REVERSE_TWIRL As Int
  REVERSE_TWIRL Effect = 15
- SLIDE_IN As Int
  SLIDE_IN Effect = 14
- STANDARD As Int
  Standard Effect = 0
- TILT As Int
  TILT Effect = 10
- TWIRL As Int
  TWIRL Effect = 13
- WAVE As Int
  WAVE Effect = 4
- ZIPPER As Int
  ZIPPER Effect = 11
Fields:
- Text_Bottom_Inside As GravityEnum
  Text Bottom InSide
- Text_Bottom_OutSide As GravityEnum
  Text Bottom OutSide
- Text_Center_Inside As GravityEnum
  Text Center InSide
- Text_Top_Inside As GravityEnum
  Text Top InSide
- Text_Top_OutSide As GravityEnum
  Text Top OutSide
Fields:
- AUTO_FIT As Int
  Creates as many columns as can fit on screen.
- NO_STRETCH As Int
  Disables stretching.
- STRETCH_COLUMN_WIDTH As Int
  Stretches the spacing between columns.
- STRETCH_SPACING As Int
  Stretches columns.
- STRETCH_SPACING_UNIFORM As Int
  Stretches the spacing between columns.
Fields:
- Compress_Format_JPG As CompressFormat
  Compression Format JPG
- Compress_Format_PNG As CompressFormat
  Compression Format PNG
PhotoGridView
Events:
- ItemClick (Position As Int, Value As Object)
- ItemLongClick (Position As Int, Value As Object)
- Ready ( As )
- ShareItemClick (Value As Object)
Methods:
- AddImage (dir As String, file As String)
 Add an image from sdcard or AssetsDir at the end of the GridView
- AddImageAt (index As Int, dir As String, file As String)
 Add an image from sdcard or AssetsDir to the desired position in the GridView
- AddImageFromWeb (address As String)
 Add an image from web at the end of the GridView
- AddImageFromWebAt (index As Int, address As String)
 Add an image from Web to the desired position in the GridView
- AddThisView
 Adds view to this activity 100%x,100%y
- ClearDiskCache
 Clears disk cache.
- ClearMemoryCache
 Clears memory cache
- DestroyEngine
 Stops ImageLoader and clears current configuration. Use this option on exit app.
- GetArrayList As List
 Gets array.
- GetCacheDir As String
 Returns application cache directory. Cache directory will be created on SD card
 ("/Android/data/[app_package_name]/cache") if card is mounted and app has appropriate permission. Else -
 Android defines cache directory on device's file system.
 Return type: @return:Cache {@link File directory}. 
 NOTE: Can be null in some unpredictable cases (if SD card is unmounted)
- GetImageListFromAssets (path As String, sort As Boolean) As List
 Get entire list of images stored in assets or sub-folder
 Examples:
 <code>
 Dim lv as ListView
 Dim l as list
 l.Initialize
 lv.Initialize("lv")
 Sub Menu_Click
 Activity.AddView(lv,0,0,100%x,100%y)
 l = GridView.GetImageListFromAssets("Here the Images folder stored in Assets")
 or
 l = GridView.GetImageListFromAssets(File.DirAssets)
 or
 l = GridView.GetImageListFromAssets("")
 For n = 0 To l.Size-1
 lv.AddSingleLine(l.Get(n))
 next
 End Sub
 </code>
- GetIndividualCacheDir As String
 Returns individual application cache directory (for only image caching from ImageLoader). Cache directory will be
 created on SD card ("/Android/data/[app_package_name]/cache/b4AGridview-Images") if card is mounted and app has
 appropriate permission. Else - Android defines cache directory on device's file system.
- GetItem (position As Int) As String
 Returns Item
 Example:
 i.Bitmap=LoadBitmap("",g.GetItem(Position))
- GetRealImagePath (filename As String) As String
 Returns the real path of the image
- GoToWebsite (url As String)
 Go to web site by given an address
 Example:
 GoToWebsite("www.example.com")
 url:
- Initialize (EventName As String)
 Initialize the object
- Initialize2 (EventName As String, withCacheName As String)
 Initialize the object and set own cache directory
- InitializeFromLayout (EventName As String, container As ViewGroup, Layout As String, LayoutID As String)
 Initialize the object from layout
- PauseEngine
 Pause ImageLoader. All new load and display tasks won't be executed until ImageLoader is resumed.
 Already running tasks are not paused.
- ResumeEngine
 Resumes waiting load and display tasks
- SetArrayList (array As ArrayList)
 Sets array.
- SetText (text As String)
 Sets the string value of the TextView.
- SetText2 (index As Int, text As String)
 Sets the string value of the TextView.
- ShareItemsTo (appName As String, item As String, subJect As String, message As String, shareTo As String)
 Share any items to ?
 app: name
 item:
 subJect:
 message:
 shareTo:
- ShareTextUrlTo (subject As String, text As String, message As String, shareTo As String)
 Share any text to ?
 subject:
 text:
 message:
 shareTo:
- ShowActionBarToShare (icons() As String)
 Sets the icons on action bar
 Example:
 Dim icons() As String = Array As String("gmail.png","email.png","gmx.png","dropbox.png","facebook.png","twitter.png","telegram.png","line.png")
 icons: as array
- ShowFromAssets (path As String, sort As Boolean)
 Populate GridView from assets or assets/sub-folder
- ShowFromBucket (path As String, sort As Boolean)
 Populate GridView from sdcard
- ShowFromMediaStore (sort As Boolean)
 Populate GridView from media store images
- ShowFromSdCard (dir As String, path As String, sort As Boolean)
 Populate GridView from sdcard
- ShowFromWeb (webStrings() As String, sort As Boolean)
 Populate GridView from web
- StopEngine
 Cancels all running and scheduled display image tasks.
 NOTE: This method doesn't shutdown if you set them.
 
 ImageLoader still can be used after calling this method.
- TextBackGroundColor (red As Int, green As Int, blue As Int)
 Sets the background color for this view.
 by default red = 0
 by default green = 0
 by default blue = 0
- TextColor2 (alpha As Int, red As Int, green As Int, blue As Int)
 Get or Sets Text Color - by default White
- isPauseOnFling As Boolean
 Whether pause ImageLoader during fling
- isPauseOnScroll As Boolean
 Whether pause ImageLoader during touch scrolling
Permissions:
- android.permission.INTERNET
- android.permission.READ_EXTERNAL_STORAGE
- android.permission.WRITE_EXTERNAL_STORAGE
Properties:
- CacheInMemory As Boolean [write only]
 Sets whether loaded image will be cached in memory.
- CacheOnDisk As Boolean [write only]
 Sets whether loaded image will be cached on disk.
- ColumnWidth As Int
 Get or Sets Specifies the fixed width for each column.
- CompressFormat As BitmaCompression
 Get or Sets the known formats a bitmap can be compressed into [ JPG or PNG ]Sets the quality of a bitmap, that can be compressed. [ 0 = low -> 100 = high ]
 by default PNG
- CompressQuality As Int
 Get or Sets the quality of a bitmap, that can be compressed. [ 0 = low -> 100 = high ]
 by default 100
- DelayBeforeLoading As Int [write only]
 Sets delay time before starting loading task. Default - no delay.
- FadeInTime As Int [write only]
 Duration of "fade-in" animation (in milliseconds)
 Whether animation should be played if image is loaded from network
 Whether animation should be played if image is loaded from disk cache
 Whether animation should be played if image is loaded from memory cache
- Friction As Boolean
 Get or Sets the amount of friction applied to flings.
- Gravity As Int [write only]
 Specifies the gravity within each cell.
- HorizontalSpacing As Int [write only]
 Defines the default horizontal spacing between columns..
- ItemHeight As Int
 Get or Sets the the size of the images will be displayed in thumbnail by default size is 480x320
- ItemWidth As Int
 Get or Sets the the size of the images will be displayed in thumbnail by default size is 480x320
- Length As Int [read only]
 Returns length
- LoadFontFromAssets As String [write only]
 Loads a new Typeface from the specified font data.
- LoadFontFromFile As String [write only]
 Loads a new Typeface from the specified font data.
- MaxAnimationVelocity As Int
 Get or Sets max animation velocity.
- NumColumns As Int
 Get or Sets the number of columns in the grid.
- PauseOnFling As Boolean [write only]
 Whether pause ImageLoader during fling
- PauseOnScroll As Boolean [write only]
 Whether pause ImageLoader during touch scrolling
- ProgressBarIndeterminate As Boolean [write only]
 Change the indeterminate mode for this progress bar.
- ProgressBarVisible As Boolean [write only]
 Set the enabled state of this view. - by default is trueChange the indeterminate mode for this progress bar.
- RemoveAt As Int [write only]
 Removes the item at the specified location from this list.
- ResetViewBeforeLoading As Boolean [write only]
 Sets whether image view will be reset before image loading start
- RoundedBitmap As Boolean [write only]
 Can display bitmap with rounded corners. - by default is false
- ScaleType As PhotoScaleTypes
 Controls how the image should be resized or moved to match the size of this ImageView.
 by default ScaleTypeFIT_XY
- ScaleTypeForRounded As ScaleType [write only]
 Controls how the RoundedBitmap should be resized or moved to match the size of this ImageView.
 by default ScaleType.FIT_CENTER
- Selection As Int
 Get or Sets the currently selected item.
- SetBorderColor As Int [write only]
 Set the border Color - by default is transparent
- SetBorderWidth As Int [write only]
 Set the border Width - by default is 0
- SetCornerRadius As Int [write only]
 Set the corner Radius - by default is 0
- SetImageOnFail As String [write only]
 Sets own icon on fail
- SetImageOnLoading As String [write only]
 Sets own icon on loading
- SetNoEffect As Boolean [write only]
 Can display bitmap with rounded corners.
 Show thumbnails with corner radius or oval. - by default is true
- ShouldOnlyAnimateFling As Boolean
 Get or Sets should only animate fling.
- ShouldOnlyAnimateNewItems As Boolean
 Get or Sets should only animate new item.
- ShowMessageError As Boolean [write only]
 Set to true if you want to display an error message.
- SimulateGridWithList As Boolean
 Get or Sets simulate grid with list.
- SmoothScrollbarEnabled As Boolean [write only]
 When smooth scrollbar is enabled, the position and size of the scrollbar thumb is computed based on the number of visible pixels in the visible items.
- StretchMode As StretchModeEnum
 Defines how columns should stretch to fill the available empty space, if any.
 Examples:
 GridView.StretchMode = GridView.StretchMode.STRETCH_SPACING
- Tag As Object
 Get or Sets this view's tag.
- TextBackGroundAlpha As Int
 Get or Sets alpha property of the view, as a value between 0 (completely transparent) and 255 (completely opaque).
 by default alpha = 0
- TextBackGroundColor2 As String [write only]
 Sets the background color for this view.
 Example:
 TextBackGroundColor2("#88666666")
- TextColor As Int
 Get or Sets Text Color - by default White
- TextGravity As Int
 Get or Sets the horizontal alignment of the text that will be used.
- TextLines As Int
 Get or Sets the TextView exactly this many lines tall.
- TextPosition As TextPositionEnum
 Get or Sets the position alignment of the text that will be used.
 param Text_Top_OutSide
 param Text_Top_Inside
 param Text_Center_Inside
 param Text_Bottom_Inside
- TextSize As Int
 Get or Sets Text Size - by default 14
- TextStyle As Int [write only]
 Sets the style in which the text should be displayed.
- TextTypeFace As TypefaceUtils
 Get or Sets the typeface and style in which the text should be displayed.
 Note that not all Typeface families actually have bold and italic variants,
 so you may need to use TextStyle(style) to get the appearance that you actually want.
- TextVisible As Boolean
 Get or Sets the visibility of the text - by default is hide
- TransitionDuration As Int
 Get or Sets transition duration.
- TransitionEffect As TransitionEffect
 Get or Sets the desired transition effect.
- Version As String [read only]
 Version of the library
- VerticalSpacing As Int [write only]
 Defines the default vertical spacing between rows.

Shahid Saeed · Jun 16, 2014

After updated to the new Library I am getting the following error:

B4X:

** Activity (main) Create, isFirst = true **


** Activity (main) Resume **


** Service (httputils2service) Create **


** Service (httputils2service) Start **





** Activity (main) Pause, UserClosed = false **


** Activity (multimedia) Create, isFirst = true **


** Activity (multimedia) Resume **


** Activity (multimedia) Pause, UserClosed = false **


** Activity (picturealbums) Create, isFirst = true **


java.lang.StackOverflowError


    at java.util.ArrayList.<init>(ArrayList.java:81)
    at java.lang.Throwable.<init>(Throwable.java:66)
    at java.lang.Throwable.<init>(Throwable.java:94)
    at java.lang.Exception.<init>(Exception.java:47)
    at java.io.IOException.<init>(IOException.java:44)
    at java.io.FileNotFoundException.<init>(FileNotFoundException.java:42)
    at android.content.res.AssetManager.openAsset(Native Method)
    at android.content.res.AssetManager.open(AssetManager.java:315)
    at android.content.res.AssetManager.open(AssetManager.java:289)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:246)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)


    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:24
Message longer than Log limit (4000). Message was truncated.

Shahid Saeed · Jun 16, 2014

OK Got it working, I had to copy the image files from the Asset folder of your example to my APP. Testing it now, looks good. I hope if you can add ability to add picture title.

lonleystar · Jun 16, 2014

Hi, i tested it on GalaxyS4 G.Tab note2 10.1 G.Tab 7 v1 and 2 also on emulator Ginger Bread, Honeycomb ,Jelly bean, KiteKat4.4.3 and it work fine.

Shahid Saeed · Jun 16, 2014

Yes, So far It is working great. Thanks for the good work. I am still testing it if there will be anything I will let you know. Please also consider picture titles.

lonleystar · Jun 16, 2014

Hi if u find some error please report it to me so i can fix.

Shahid Saeed · Jun 16, 2014

@lonleystar so far with the new update the GridView is much faster now. I am using it with page view; but page view is still a bit slow and takes time to move between pictures, need to wait for some time before we do zoomin. is it possible to show a progress bar as dialogue when we click on an picture from GridView to be Displayed on PageView?

Shahid Saeed · Jun 16, 2014

lonleystar said:
Hi if u find some error please report it to me so i can fix.

I just found 1 bug when scrolling the GridView the last pictures doesn't completly shows only 10% area is visible and no more scroll.

lonleystar · Jun 16, 2014

Hi Shahid, I tried it and i've not this issue can u please make a photo to this issue so i can see it.
About View Pager will come a new version with the same engine.

Shahid Saeed · Jun 17, 2014

I have attached 1 screen shot from your example and other from my APP. You can notice last pictures in bottom are not full also pictures in right column in my app are not complete. I have also notice there are still some pictures which it had not loaded. I am using GridView in a Panel.

B4X:

GridView.initialize("GridView")
PGV.AddView(GridView,0dip,0dip,100%x,100%y)

If fnc.GetDevicePhysicalSize > 6 Then
    '7'' or 10'' tablet
        GridView.ItemWidth= ( GridView.Width / 3) 
        GridView.ItemHeight=GridView.ItemWidth
        GridView.HorizontalSpacing= 4dip   
        GridView.VerticalSpacing= 4dip
        GridView.NumColumns= 3       
    Else
    'phone
        GridView.ItemWidth= GridView.Width / 2
        GridView.ItemHeight= GridView.ItemWidth
        GridView.HorizontalSpacing=4dip   
        GridView.VerticalSpacing=4dip
        GridView.NumColumns= 2   
    End If       
   
    'GridView.ColumnWidth=GridView.ItemWidth
    'GridView.StretchMode=GridView.STRETCH_COLUMN_WIDTH
    GridView.Gravity=Gravity.CENTER
    GridView.ScaleType = GridView.ScaleType.Fit_XY
   
    GridView.SetNoEffect = False
    GridView.FadeInTime = 300
    GridView.RoundedBitmap = False
    GridView.SetBorderColor = Colors.RGB(133,22,30)
    'GridView.SetCornerRadius = 20
    GridView.SetBorderWidth =1
   
    'GridView.DelayBeforeLoading = 300
    GridView.ProgressBarIndeterminate = False
    GridView.ProgressBarVisible = True


Dim parser As JSONParser
    parser.Initialize(json)
   
    Dim root As Map = parser.NextObject
    Dim albums As List = root.Get("albums")
   
    For Each col_albums As Map In albums
        'Dim album_id As String = col_albums.Get("album_id")
        Dim album_image As String = col_albums.Get("album_image")
        'Dim album_title As String = col_albums.Get("album_title")
       
    GridView.AddImageFromWeb(album_image)
    's = Array As String(album_image)   
    Next

Ferdari · Jun 17, 2014

Hi Lonleystar, Thanks for the update..

but im getting an error using the ShowFromWeb

B4X:

java.lang.StackOverflowError
    at java.util.ArrayList.<init>(ArrayList.java:81)
    at java.lang.Throwable.<init>(Throwable.java:66)
    at java.lang.Throwable.<init>(Throwable.java:94)
    at java.lang.Exception.<init>(Exception.java:47)
    at java.io.IOException.<init>(IOException.java:44)
    at java.io.FileNotFoundException.<init>(FileNotFoundException.java:42)
    at android.content.res.AssetManager.openAsset(Native Method)
    at android.content.res.AssetManager.open(AssetManager.java:315)
    at android.content.res.AssetManager.open(AssetManager.java:289)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:246)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)...

My website returns me a list of comma separated images , then it parses every , and creates an array

B4X:

'Returned comma separated images from my server then:

Dim res As String = Job.GetString
Dim s() As String = Regex.Split(",", res)
Log(s.Length)
For Each n As String In s
  Log(n)
Next
            
'Populate Grid
GridView.ShowFromWeb(s, False)

My question is how do i need to parse the contents from my web, it isn't working anymore (it works on your previous lib version),
as i see in example all images from array starts with _ "imageUrl", _ "imageUrl",

B4X:

    fromWeb = Array As String( _
    "https://lh4.googleusercontent.com/-Z4zGiC5nWdc/URqvBdEwivI/AAAAAAAAAbs/ZRZR1VJ84QA/s1024/Sin%252520Lights.jpg", _
            "https://lh4.googleusercontent.com/-_0cYiWW8ccY/URqvBz3iM4I/AAAAAAAAAbs/9N_Wq8MhLTY/s1024/Starry%252520Lake.jpg", _
            "https://lh3.googleusercontent.com/-A9LMoRyuQUA/URqvCYx_JoI/AAAAAAAAAbs/s7sde1Bz9cI/s1024/Starry%252520Night.jpg")

I'dont know how to handle this kind of array from my server :S

Please help

Shahid Saeed · Jun 17, 2014

Ferdari said:

Hi Lonleystar, Thanks for the update..

but im getting an error using the ShowFromWeb

B4X:

java.lang.StackOverflowError
    at java.util.ArrayList.<init>(ArrayList.java:81)
    at java.lang.Throwable.<init>(Throwable.java:66)
    at java.lang.Throwable.<init>(Throwable.java:94)
    at java.lang.Exception.<init>(Exception.java:47)
    at java.io.IOException.<init>(IOException.java:44)
    at java.io.FileNotFoundException.<init>(FileNotFoundException.java:42)
    at android.content.res.AssetManager.openAsset(Native Method)
    at android.content.res.AssetManager.open(AssetManager.java:315)
    at android.content.res.AssetManager.open(AssetManager.java:289)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:246)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)
    at it.giuseppe.salvi.library.photo.grid.view.adapter.PhotoGridBaseAdapter.getBitmapFromAssets(PhotoGridBaseAdapter.java:248)...

My website returns me a list of comma separated images , then it parses every , and creates an array

B4X:

'Returned comma separated images from my server then:

Dim res As String = Job.GetString
Dim s() As String = Regex.Split(",", res)
Log(s.Length)
For Each n As String In s
  Log(n)
Next
          
'Populate Grid
GridView.ShowFromWeb(s, False)

My question is how do i need to parse the contents from my web, it isn't working anymore (it works on your previous lib version),
as i see in example all images from array starts with _ "imageUrl", _ "imageUrl",

B4X:

    fromWeb = Array As String( _
    "https://lh4.googleusercontent.com/-Z4zGiC5nWdc/URqvBdEwivI/AAAAAAAAAbs/ZRZR1VJ84QA/s1024/Sin%252520Lights.jpg", _
            "https://lh4.googleusercontent.com/-_0cYiWW8ccY/URqvBz3iM4I/AAAAAAAAAbs/9N_Wq8MhLTY/s1024/Starry%252520Lake.jpg", _
            "https://lh3.googleusercontent.com/-A9LMoRyuQUA/URqvCYx_JoI/AAAAAAAAAbs/s7sde1Bz9cI/s1024/Starry%252520Night.jpg")

I'dont know how to handle this kind of array from my server :S

Please help

Copy the image files from library example assets folder to your assets folder.

Try this:

B4X:

GridView.AddImageFromWeb(your images)

Ferdari · Jun 17, 2014

Shahid Saeed said:
Copy the image files from library example assets folder to your assets folder.

Try this:

B4X:

GridView.AddImageFromWeb(your images)

Thanks Shahid,
i replaced GridView.ShowFromWeb with this:

B4X:

Dim res As String = Job.GetString
Dim s() As String = Regex.Split(",", res)
Log(s.Length)
For Each n As String In s
    GridView.AddImageFromWeb(n) 'Your suggestion works good here
    Log(n)
Next

Works good thanks again

lonleystar · Jun 17, 2014

Hi Shahid, can u send to me just the routine with full address to get image from your server so i can check it maybe i need fix the lib for that.

lonleystar · Jun 17, 2014

Hi Ferdari, i install your app GoodPaper from google play doesnt work it say cargando imagenes... and after The connection has timed out.

Ferdari · Jun 17, 2014

lonleystar said:
Hi Ferdari, i install your app GoodPaper from google play doesnt work it say cargando imagenes... and after The connection has timed out.

My server is up and running, but in some countries may be a delay or high latency causing it.
http://www.downforeveryoneorjustme.com/programadosparaganar.com
http://www.pingmyurl.com/ ----> ping programadosparaganar.com

But by the way, in about 20min will be available the new version 1.4, check again soon, it works better and faster, thank to you

lonleystar · Jun 17, 2014

Hi, to populate from web i use the way illustrated on my demo. check this video http://www.salvigiuseppe.altervista.org/s4video/GridView.mp4

or write in to the browser the address above

Shahid Saeed · Jun 17, 2014

lonleystar said:
Hi Shahid, can u send to me just the routine with full address to get image from your server so i can check it maybe i need fix the lib for that.

Here you go, it is json code consisting on albums and pictures in each album. In my app first I'm just loading the albums and when you select an album it shows pictures in that album.

B4X:

http://www.prcamels.ae/json/pictures.json.id.php

lonleystar · Jun 17, 2014

Hi, did u tried this way "http://www.prcamels.ae/images/album/thumb90524855.jpg" instead of this "http:\/\/www.prcamels.ae\/images\/album\/thumb90524855.jpg"

Shahid Saeed · Jun 18, 2014

lonleystar said:
Hi, did u tried this way "http://www.prcamels.ae/images/album/thumb90524855.jpg" instead of this "http:\/\/www.prcamels.ae\/images\/album\/thumb90524855.jpg"

Did you parse JSON when you parse it will look like as below:- (www.jsonlint.com) check my json URL on this website with the output. when you parse it in B4A just get the URL with LOG and see the output.

B4X:

{
    "albums": [
        {
            "album_id": "11",
            "album_title": "Ù…Ø±ÙƒØ² Ø§Ù„Ø¥Ù†ØªØ§Ø¬",
            "album_image": "http://www.prcamels.ae/images/album/thumb08076968.jpg",
            "pictures": [
                {
                    "picture_id": "72",
                    "picture_date": "الأحد ، ٢٣ فبراير  ٢٠١٤",
                    "picture_title": "Ù…Ø±ÙƒØ² Ø§Ù„Ø¥Ù†ØªØ§Ø¬",
                    "picture_image": "http://www.prcamels.ae/images/picture/pic38871941.jpg"
                },
                {
                    "picture_id": "71",
                    "picture_date": "الأحد ، ٢٣ فبراير  ٢٠١٤",
                    "picture_title": "Ù…Ø±ÙƒØ² Ø§Ù„Ø¥Ù†ØªØ§Ø¬",
                    "picture_image": "http://www.prcamels.ae/images/picture/pic42709518.jpg"
                },

parse in B4A

B4X:

Sub Process_Globals    
    PictureUrl = "http://www.prcamels.ae/json/pictures.json.id.php"
    Dim PictureJson As String    
End Sub

Sub Globals    
    Dim GridView As PhotoGridView
    Dim PGV As Panel    
End Sub

Sub Activity_Create(FirstTime As Boolean)    
    Activity.LoadLayout("picturealbums")    
    GridView.initialize("GridView")
    PGV.AddView(GridView,0dip,0dip,100%x,100%y)
    'GridView.ClearCache
    'GridView.Animation=True
    If fnc.GetDevicePhysicalSize > 6 Then
    '7'' or 10'' tablet
        GridView.ItemWidth= ( GridView.Width / 3) 
        GridView.ItemHeight=GridView.ItemWidth
        GridView.HorizontalSpacing= 4dip   
        GridView.VerticalSpacing= 4dip
        GridView.NumColumns= 3       
    Else
    'phone
        GridView.ItemWidth= GridView.Width / 2
        GridView.ItemHeight= GridView.ItemWidth
        GridView.HorizontalSpacing=4dip   
        GridView.VerticalSpacing=4dip
        GridView.NumColumns= 2   
    End If       
   
    'GridView.ColumnWidth=GridView.ItemWidth
    'GridView.StretchMode=GridView.STRETCH_COLUMN_WIDTH
    GridView.Gravity=Gravity.CENTER
    GridView.ScaleType = GridView.ScaleType.Fit_XY
   
    GridView.SetNoEffect = False
    GridView.FadeInTime = 300
    GridView.RoundedBitmap = False
    GridView.SetBorderColor = Colors.RGB(133,22,30)
    'GridView.SetCornerRadius = 20
    GridView.SetBorderWidth =1
   
    'GridView.DelayBeforeLoading = 300
    GridView.ProgressBarIndeterminate = False
    GridView.ProgressBarVisible = True
       
    Dim GetPage As HttpJob
    GetPage.Initialize("GetPageJob", Me)
    GetPage.Download(PictureUrl)
   
End Sub

Sub ParseJSON(json As String)
    Dim parser As JSONParser
    parser.Initialize(json)
   
    Dim root As Map = parser.NextObject
    Dim albums As List = root.Get("albums")
   
    For Each col_albums As Map In albums
        'Dim album_id As String = col_albums.Get("album_id")
        Dim album_image As String = col_albums.Get("album_image")
        'Dim album_title As String = col_albums.Get("album_title")
       
    GridView.AddImageFromWeb(album_image)    
    Next                       
        Log(album_image)
   
End Sub

Sub JobDone(job As HttpJob)
    If job.Success = True Then
        PictureJson = job.GetString
        ParseJSON(PictureJson)
        'ProgressDialogHide
    Else
        Log("Error: " & job.ErrorMessage)
    End If       
End Sub

Sub Activity_Resume    
    GridView.ResumeEngine
End Sub

Sub Activity_Pause (UserClosed As Boolean)
    GridView.StopEngine
End Sub

Sub GridView_ItemClick(Position As Int, Value As Object)  
      Pictures.AlbumID = Position
     'Pictures.AlbumTitle = AlbumTitle
     Log(Position)
     Activity.Finish
     StartActivity(Pictures)
End Sub

lonleystar · Jun 18, 2014

Hi, check this to me work.

B4X:

Sub ParseJSON(json As String)
'  Dim parser As JSONParser
'  parser.Initialize(json)
'  Dim root As Map = parser.NextObject
'  Dim albums As List = root.Get("albums")

'  For Each col_albums As Map In albums
        'Dim album_id As String = col_albums.Get("album_id")
'      Dim album_image As String = col_albums.Get("album_image")
        'Dim album_title As String = col_albums.Get("album_title")
   
'  GridView.AddImageFromWeb(album_image) 
'  Next                   
'      Log(album_image)

    Dim parser As JSONParser
     
    ' parser.Initialize(File.ReadString(File.DirAssets, "1.txt"))
     parser.Initialize(json)
     Dim root As Map = parser.NextObject
     
     Dim albums As List = root.Get("albums")
     
   For Each colalbums As Map In albums
   
     Dim album_id As String = colalbums.Get("album_id")
     
     Dim pictures As List = colalbums.Get("pictures")
     
   For Each colpictures As Map In pictures
   
       Dim picture_image As String = colpictures.Get("picture_image")
     
       Dim picture_title As String = colpictures.Get("picture_title")
     
       Dim picture_date As String = colpictures.Get("picture_date")
     
       Dim picture_id As String = colpictures.Get("picture_id")
     GridView.AddImageFromWeb(picture_image)
   Next
   
     Dim album_image As String = colalbums.Get("album_image")
     
     Dim album_title As String = colalbums.Get("album_title")
     
   Next

End Sub

B4A Library [Library] B4aGridView v3.80

Attachments

Active Member

Active Member

Well-Known Member

Active Member

Well-Known Member

Active Member

Active Member

Well-Known Member

Active Member

Active Member

Active Member

Active Member

Well-Known Member

Well-Known Member

Active Member

Well-Known Member

Active Member

Well-Known Member

Active Member

Well-Known Member

Attachments

Similar Threads

Privacy & Transparency

Privacy & Transparency