httpimg view problem

Can you post your code?

Code below. Have tried ImageView and WebView in the IDE. Currently have ImageView set for images. It gets parsed but will not display the image. We tried it with hyperlink extension and then just the file. If I hardcode the image in the IDE it works fine.

Thanks,
R


Sub Process_info (info As String)
' Parsing

Dim mapobj As Map
Dim sitems As List
Dim JSON As JSONParser
Dim i As Int
Dim rtext As String
JSON.Initialize(info)
sitems = JSON.NextArray
For i = 0 To sitems.Size - 1
dataholder = sitems.Get(i)
rtext = rtext & dataholder.Get("firstname") & " " & dataholder.Get("lastname") & CRLF & "PO: " & dataholder.Get("PO")



Next

delivery (rtext)

' check for another ticket(s) maresult = "[bla bla bla]" then third activity which will
' present button to retrieve tickets from storeage, need to allow for forward and back through
'

Log(rtext)
If rtext = "" Then
Label1.Text = " PO's Retrieved for Confirmation Code" & Mainr.Confirm & "Thank You"
Return
End If

Return
End Sub
Sub hc_ResponseError (Reason As String, StatusCode As Int, TaskId As Int)
' was HttpClient1
Log(Reason)
Log(StatusCode)
ProgressDialogHide
msg = "Error connecting to server."
If Reason <> Null Then msg = msg & CRLF & Reason
ToastMessageShow (msg, True)
End Sub
Sub delivery (rtext)

Dim i, n As Int

Dim images() As ImageView
images = Array As ImageView(ImageView1, ImageView2, ImageView3, ImageView4)
For c = 0 To 3
n = c + 0
images(n).Initialize("images")
Next


Activity.AddView(ImageView1, 0, 0, 530, 270)
Activity.AddView(ImageView2, 0, 40, 80, 80)
Activity.AddView(ImageView3, 450, 40, 80, 80)
Activity.AddView(ImageView4, 160, 130, 190, 40)

rtexttholder = "Ticket Holder: " & dataholder.Get("firstname") & " " & dataholder.Get("lastname")
rtextpo = "PO: " & dataholder.Get("po")
rtextdatetime = "Date/Time: " & dataholder.Get("datetime")
rtextbus = "Business: " & dataholder.Get("bus")
rtextbusimg = dataholder.Get("busimg")

' StringUtils.DecodeBase64




Label1.Text = rtexttholder
Label2.Text = rtextpo
' Label6.Text = rtextskuimage
Label7.Text = rtextdatetime
Label8.Text = rtextbus


Return
End Sub

Evening

I got it, much thanks all.
R
:signOops:

Reason

The issue was making the change to transparent and use of canvas. Now I do see that I really don't need canvas but left it for the moment in the code.

Thanks for the help,
R