handle bmp images

hookshy

Well-Known Member
Licensed User
Longtime User
Hello,
I wrote the litle program below and first time I start the app after
pressing the back key the OS gives this error:
Process hs.probe has stoped unexpectedly . Please try again.

After restarting the app , evryting works fine.
The bmp size I what to load are each 20kb.
Were I am doing wrong?
Thank you.


B4X:
Sub Globals
  
   Dim f1,f2,f3,f4,f5,f6,f7 As ImageView
   Dim b1,b2,b3,b4,b5,b6,b7 As Bitmap
   Dim bmp() As Bitmap
   Dim f() As ImageView  
End Sub

Sub Activity_Create(FirstTime As Boolean)
  
Activity.Color=Colors.White

bmp=Array As Bitmap(b1,b2,b3,b4,b5,b6,b7)
Dim n As Int

For i=0 To 6
  n=i+1
  bmp(i).Initialize(File.DirAssets,"f" & n & "s.png")
Next


f=Array As ImageView(f1,f2,f3,f4,f5,f6,f7)
For i=0 To 6

  f(i).Initialize("")
  f(i).Gravity=Gravity.FILL
  f(i).SetBackgroundImage(bmp(i))
  Activity.AddView(f(i),50 * i,50*i ,100,100)
Next

End Sub
[\code]
 
Last edited:
Top