AndroidResource 9patch problem

ferya · Feb 24, 2013

I try to use android drawable resource.
the code bellow works with all resources except 9patch drawables
how could solve this problem?

Dim BitmapDrawable1 As BitmapDrawable
Dim DrawableName As String
Dim Object1 As Object
DrawableName="gallery_selected_default"
Object1=AndroidResources1.GetAndroidDrawable(DrawableName)
If Object1=Null Then
Log("Drawable NOT FOUND: "&DrawableName)
ImageView1.Bitmap=Null
Else
BitmapDrawable1=Object1
ImageView1.Bitmap=BitmapDrawable1.Bitmap
End If
the error code is
java.lang.ClassCastException: android.graphics.drawable.NinePatchDrawable cannot be cast to android.graphics.drawable.BitmapDrawable

also I checkd with this (ImageView1.Background=Object1) but got same error

thedesolatesoul · Feb 24, 2013

Use something like Erel used here: http://www.b4x.com/forum/basic4andr...283-nine-patch-images-tutorial.html#post80908

ferya · Feb 24, 2013

formated code

B4X:

Dim BitmapDrawable1 As BitmapDrawable
   Dim DrawableName As String
   Dim Object1 As Object
   DrawableName="gallery_selected_default"
   Object1=AndroidResources1.GetAndroidDrawable(DrawableName)
   If Object1=Null Then
      Log("Drawable NOT FOUND: "&DrawableName)
      ImageView1.Bitmap=Null
   Else
      BitmapDrawable1=Object1
      ImageView1.Bitmap=BitmapDrawable1.Bitmap
   End If

ferya · Feb 24, 2013

hi thedesolatesoul
this is an android resource drawable and Erel sample is for 9patch png files.
I don't know how handle this.

Erel · Feb 24, 2013

See my answer in the other thread. The returned object is not a BitmapDrawable. You should set it directly as the view's background.

ferya · Feb 24, 2013

Hi Erel
I checked it but got same error

thedesolatesoul · Feb 24, 2013

ferya said:
Hi Erel
I checked it but got same error

Set the background to 9patch not the bitmap.

ferya · Feb 24, 2013

sorry!
please help I don't know how
because the graphic drawabel is come from android R.drawabel and I don't know how work?
and I want set that for bitmap not background. background image converts to stretched.

thedesolatesoul · Feb 24, 2013

ferya said:
sorry!
please help I don't know how
because the graphic drawabel is come from android R.drawabel and I don't know how work?
and I want set that for bitmap not background. background image converts to stretched.

That is the whole point of 9patch, that the image can stretch to the views size.
Why do you want to display a 9patch?

ferya · Feb 25, 2013

I want to use Android R Drawables (Android Drawables)
but some of them are .9 files.
All of them work in my code except .9 files.
I use this cod in my widget service.

Erel · Feb 25, 2013

You should use:

B4X:

ImageView1.Background = Object1

Informatix · Feb 25, 2013

ferya said:
I want to use Android R Drawables (Android Drawables)
but some of them are .9 files.
All of them work in my code except .9 files.
I use this cod in my widget service.

Remove ".9.png" in the filename when you want to access these files.

ferya · Feb 26, 2013

sorry but they are not from file.
they are R drawables from this link:
Android Drawables
I changed

B4X:

rv.SetImage("img1",BitmapDrawable1.Bitmap)

by this

B4X:

rv.SetImage("img1",object1)

as Erel said.
but got same error
(java.lang.ClassCastException: android.graphics.drawable.NinePatchDrawable cannot be cast to android.graphics.drawable.BitmapDrawable)

please see my real code bellow:

B4X:

Sub btn_Test
   Dim BitmapDrawable1 As BitmapDrawable
   Dim AndroidResources1 As AndroidResources
   Dim object1 As Object
   Dim dname As String
   dname="sym_action_call"
   object1=AndroidResources1.GetAndroidDrawable(dname)
   If object1=Null Then
      Log("Drawable NOT FOUND: "&dname)
   Else
      BitmapDrawable1=object1
   End If
   If object1 Is BitmapDrawable Then
      Log("is drawable")
      rv.SetImage("img1",BitmapDrawable1.Bitmap)
      rv.SetText("lblreport",lblr.Get(index))
      rv.UpdateWidget
   End If

Informatix · Feb 26, 2013

The system drawables are files. Use this code and see by yourself:

B4X:

Dim r As Reflector
r.Target = r.GetContext
r.Target = r.RunMethod("getResources")
r.Target = r.RunMethod("getSystem")
Dim ID_PressedDrawable As Int
ID_PressedDrawable = r.RunMethod4("getIdentifier", Array As Object("list_pressed_holo_dark", "drawable", "android"), _
Array As String("java.lang.String", "java.lang.String", "java.lang.String"))
r.Target = r.GetContext
r.Target = r.RunMethod("getResources")
Dim PressedDrawable As Object = r.RunMethod2("getDrawable", ID_PressedDrawable, "java.lang.int")

EDIT: You can see the drawables and their real name in C:\Android\android-sdk\platforms\android-nn\data\res\drawable-xxxx (replace nn by the platform version and xxxx by the screen size)

corwin42 · Feb 26, 2013

@ferya:

It's a bit confusing because your question changed. First you said that you wanted to set a NinePatchDrawable to an ImageView. Now you want to set it to a Widgets ImageView over a RemoteViews object. These are two totally different things.

At first you have to make clear from where your resource comes. For Widget ImageViews which are accessed over a RemoteView there are three possibilities to set the image:
1. as a Bitmap (directly supported by B4A)
2. as a ResourceId (possible with Reflection)
3. as a URI (possible with Reflection)

So what is exactly the source of your drawable? Do you have an id for it?

ferya · Feb 27, 2013

sorry I am newby.
I wrote a sample for my exact question here:

B4X:

#Region Module Attributes
   #FullScreen: False
   #IncludeTitle: false
   #ApplicationLabel: test AndroidDrawable
   #VersionCode: 1
   #VersionName: 
   #SupportedOrientations: unspecified
   #CanInstallToExternalStorage: False
#End Region
Sub Process_Globals
End Sub

Sub Globals
   Dim AndroidResources1 As AndroidResources
   Dim ImageView1 As ImageView
   Dim Label1 As Label
   Dim ListView1 As ListView
End Sub

Sub Activity_Create(FirstTime As Boolean)
   Activity.LoadLayout("Main")
   Dim AndroidDrawableNames As List
   AndroidDrawableNames=AndroidResources1.GetAndroidDrawableNames
   For i=0 To AndroidDrawableNames.Size-1
   ListView1.AddSingleLine(AndroidDrawableNames.Get(i))
   Next
End Sub

Sub Activity_Resume
End Sub

Sub Activity_Pause (UserClosed As Boolean)
End Sub
Sub ListView1_ItemClick(Posision As Int,Value As Object)
   Label1.Text=Value
   Dim BitmapDrawable1 As BitmapDrawable
   Dim Object1 As Object
   Object1=AndroidResources1.GetAndroidDrawable(Value)
   If Object1=Null Then
      ImageView1.Bitmap=Null
   Else
      BitmapDrawable1=Object1
      ImageView1.Bitmap=BitmapDrawable1.Bitmap
   End If
End Sub

clicking on ListView Items shows the graphic by ImageView1
But some of them shows
some of them cause this error:
java.lang.ClassCastException: android.graphics.drawable.NinePatchDrawable cannot be cast to android.graphics.drawable.BitmapDrawable
and some of them cause this:
java.lang.ClassCastException: android.graphics.drawable.StateListDrawable cannot be cast to android.graphics.drawable.BitmapDrawable
View attachment androidR.zip
For example if you choose (arrow_down_float) from ListView it shows correctly
but (alert_dark_frame) causes error1 and
(btn_default) causes error2

Erel · Feb 27, 2013

Have you read my previous answers? Not all drawables are BitmapDrawables.

You should assign the returned drawable as the ImageView Background.

ferya · Feb 28, 2013

Hi Erel
I did
but it is not working yet.
please correct my source file
it's attached in previous post.
I'm not perfect in programming.
sorry for wasting your time.

Erel · Feb 28, 2013

Try this:

B4X:

Sub ListView1_ItemClick(Posision As Int,Value As Object)
    Label1.Text=Value
    Dim Object1 As Object
    Object1=AndroidResources1.GetAndroidDrawable(Value)
    If Object1=Null Then
        ImageView1.Bitmap=Null
    Else
        ImageView1.Background = Object1
    End If
End Sub

ferya · Feb 28, 2013

Hi Erel
thank you for your quick replay.
Just now I change my code to

B4X:

Sub ListView1_ItemClick(Posision As Int,Value As Object)
   Label1.Text=Value
   Dim BitmapDrawable1 As BitmapDrawable
   Dim Object1 As Object
   Object1=AndroidResources1.GetAndroidDrawable(Value)
   If Object1=Null Then
      ImageView1.Bitmap=Null
   Else
      BitmapDrawable1=Object1
      ImageView1.Background=Object1
   End If
End Sub

and run it.
when I click on first item of ListView (alert_dark_frame) I got this error:
java.lang.ClassCastException: android.graphics.drawable.NinePatchDrawable cannot be cast to android.graphics.drawable.BitmapDrawable
What is wrong with me? http://www.b4x.com/forum/images/icons/icon9.gif

AndroidResource 9patch problem

Member

Expert

Member

Member

B4X founder

Member

Expert

Member

Expert

Member

B4X founder

Expert

Member

Expert

Expert

Member

B4X founder

Member

B4X founder

Member

Similar Threads

Privacy & Transparency

Privacy & Transparency