Android Question How to implement image in Grid by Amir_RecyclerView and Amir_Glid

Discussion in 'Android Questions' started by Schakalaka, May 8, 2019.

  1. Schakalaka

    Schakalaka Member Licensed User

    Hello, again.
    I tried every possible way for for display images in grid view ((start from Amir_RVLayoutAnimation grid layout) with no luck.
    In another sample you use sub load image and a "Secect case". but this is not for me because i load images from json job, and the number of images for loading change.


    Code:
    Dim j As HttpJob
        j.Initialize(
    "",Me)
        j.Download( http://eliteandroidapp.netsons.org/php_web_services/api.php?cat_list  )
        
    ProgressDialogShow2("Downloading...:"False)
        
    Wait for (j) jobdone (j As HttpJob)
        
    If j.Success Then
            
    Log(j.GetString)
            
    Dim parser As JSONParser
            parser.Initialize(j.Getstring)
            
    Dim root As Map = parser.NextObject
            
    Dim HD_WALLPAPER As List = root.Get("HD_WALLPAPER")
            
    For Each colHD_WALLPAPER As Map In HD_WALLPAPER
                
    Dim category_total_wall As String = colHD_WALLPAPER.Get("category_total_wall")
                
    Dim category_image As String = colHD_WALLPAPER.Get("category_image")
                
    Dim category_name As String = colHD_WALLPAPER.Get("category_name")
                
    Dim category_image_thumb As String = colHD_WALLPAPER.Get("category_image_thumb")
                
    Dim cid As String = colHD_WALLPAPER.Get("cid")

            
    Next

        
    Else
            
    Log("Error: " & j.ErrorMessage)
       
        
    End If
        j.Release
        
    ProgressDialogHide
    i have try to create a imageview in the front of panel, and load here the image

    in Amir_onCreateViewHolder
    Code:
    Dim img As ImageView
        img.Initialize(
    "")
        pnl.AddView(img,
    4dip,4dip,pnl.Width,pnl.Height)
        Parent.Height=(
    100%x/Recycler.LayoutSpanCount)+8dip
    in Amir_onBindViewHolder

    Code:
    Dim pnl As Panel = Parent.GetView(0)
        
    Dim img As ImageView = pnl.GetView(0)
    Parent.Height=(
    100%x/Recycler.LayoutSpanCount)+8dip

    Transformation _
            .FitCenter _
        .CircleCrop _

        
    Dim Link As String = "placeholder_cat.png" 'Don't Forgot to Add Link that should be like "category_name" or"category_image_thumb"
        Glide.Load(link,(100%x/Recycler.LayoutSpanCount)-8dip,100%x/Recycler.LayoutSpanCount,True)).Apply(Glide.RO.Transform(Transformation)).Into(img)
    Aspected result (there aren' t simple bottoms) img1;
    sample example without lib:
    Code:
    https://drive.google.com/file/d/11Vv0NUzggNP4WavX1c_sqsRtIlA8hl2W/view?usp=sharing
    somebody that have buy it, explain me how to do it
    Thanks you
     

    Attached Files:

    Last edited: May 8, 2019
  2. alimanam3386

    alimanam3386 Active Member Licensed User

    Is this exact things you want ?
     

    Attached Files:

  3. Schakalaka

    Schakalaka Member Licensed User

    yes, it is perfect.
    now, i have try to add a local image, if there are no internet connection, for example.

    Code:
    glid.As.Bitmap.LoadURL(itm.link).Apply(glid.RO.ErrorDrawable(LoadBitmap(File.DirAssets,"appMobi_icon_live_update.png")).Apply(glid.RO.CircleCrop)).Into(img)
    o_O

    Other Step:
    i have try to add load more, if items are more that 12.
    i have add the timer :
    Code:
    Dim loadmoreTimer As Timer
    and
    Code:
    Private Sub Amir_onScrolledToEnd
       
        
    If loadmoreTimer.IsInitialized=False Then _
        loadmoreTimer.Initialize(
    "loadmoreTimer",1000)
        
    If loadmoreTimer.Enabled=False Then _
            loadmoreTimer.Enabled=
    True
    End Sub
    Private Sub loadmoreTimer_Tick
        loadmoreTimer.Enabled=
    False
       
        ItemCount=ItemCount+
    1
        RV.Adapter2.NotifyItemInserted(ItemCount-
    11)
        
    If ItemCount = Addapter.Size Then _
            RV.ScrollToEndListener(
    False)
    End Sub
    removin the sub load footer and header..
    But it haven 't the load more effect..
    Help?
     
    Last edited: May 8, 2019
  4. alimanam3386

    alimanam3386 Active Member Licensed User

    please start a new thread for each question.
     
Loading...
  1. This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
    By continuing to use this site, you are consenting to our use of cookies.
    Dismiss Notice