lv.Initialize("lv")
pnl.Initialize("pnl")
Do While j < dataToSend.Size - 1
tmpDato = decodeDato(dataToSend.Get(j))
line = tmpDato.misura & " mg/dl " & tmpDato.dataTime
Log("Line: " & line)
lv.AddSingleLine(line)
j = j + 1
Loop
pnl.AddView(lv, 0, 0, 95%x, 300dip)
cd.AddView(pnl,0,0, 90%x, 60%y )
Log("Open Custom Dialog")
ret = cd.Show("Letture acquisite ", "OK", "","" , Null)
Log("CustomDialog Response: " & ret)