Android Question [SOLVED] [B4X] Google OAuth2, how to get and apply the profile photo

Cableguy

Expert
Licensed User
Longtime User
Hi guys,

I'm trying to get the avatar or profile photo, whatever you want to call it, using the OAuth2 class, but Not getting very far...
here's what I've tried, no luck.:
B4X: 
    Dim avatar As Map = map.Get("cover_photos")
    If avatar.IsInitialized Then
        Dim my_avatar As Bitmap = avatar.Get(0)
        my_avatar.Initialize2(avatar.Get("value"))
        ImageView1.Bitmap = my_avatar
    End If
 
Sort by date Sort by votes

Cableguy

Expert
Licensed User
Longtime User
As usual, I keep searching, fiddling, tweaking, and eventually get to the solution on myself...
So, here you have, how to retrieve the profile photo using OAuth2.

B4X: 
...............................................
    
    Dim avatar As List = map.Get("photos")
    If avatar.IsInitialized And avatar.Size > 0 Then
        Dim my_avatar As Map = avatar.Get(0)
        DownloadImage(my_avatar.Get("url"), ImageView1)
    End If

...............................................

Sub DownloadImage(Link As String, iv As ImageView)
    Dim j As HttpJob
    j.Initialize("", Me)
    j.Download(Link)
    Wait For (j) JobDone(j As HttpJob)
    If j.Success Then
        iv.Bitmap = j.GetBitmap
    End If
    j.Release
End Sub
 
Upvote 0
You must log in or register to reply here.

Similar Threads

  • Article
B4A Class [class][B4X] Microsoft OAuth2
Replies
5
Views
2K
josejad
  • Article
B4A Library [B4X] Supabase - The Open Source Firebase alternative
2 3 4
Replies
63
Views
32K
Alexander Stolte
Mashy Teaches WebApp/Website Development with BANanoVuetifyAD3 - The New Series
7 8 9
Replies
163
Views
75K
Mashiane
  • Locked
  • Article
B4A Class [class][B4X] Google OAuth2
2
Replies
24
Views
38K
Erel
  • Locked
  • Article
Android Tutorial [B4X] OkHttpUtils2 with Wait For
2
Replies
36
Views
118K
Erel
Menu
Log in
Register
Cookies are required to use this site. You must accept them to continue using the site. Learn more…