I need to convert the B4a code below for B4i but can't find any examples. How do I code it?
B4X:
Sub Globals
Private ImageView1 As ImageView
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("Image_landscape")
Dim bmp As Bitmap = LoadBitmapResize(filedir, filename, ImageView1.Width, ImageView1.Height, True)
bmp.Initialize(filedir, filename)
ImageView1.SetBackgroundImage(bmp).Gravity = Gravity.FILL
End Sub