مشکل در نمایش عکس در مولتی پنل

[majid08 266]

سلام

من یه دیتابیس دارم

در نرم افزار یک اکتیویتی دارم و توش یه مولتی پنل گذاشتم کد نوشتم ولی فقط یه عکس رو توی همه پنلها نمایش میده

Sub Namayesh As Bitmap

Dim cur As Cursor
cur=sql1.ExecQuery("SELECT aks FROM Tbl1  ")
cur.Position=0

Dim bytes() As Byte
bytes=cur.GetBlob("aks")

Dim input As InputStream
input.InitializeFromBytesArray(bytes,0,bytes.Length)

Dim b As Bitmap
b.Initialize2(input)
input.Close
Return(b)
cur.Close
End Sub



و این هم کد مولتی پنل


 cr = sql1.ExecQuery("SELECT * FROM tbl1  ")
scr.Initialize2(20%y,"scr")
Activity.AddView(scr,0%x,0%y,100%x,100%y)
For i = 1 To cr.RowCount -1
Dim p As Panel
p.Initialize("p")
scr.Panel.AddView(p,left1,top1,20%x,15%y)
left1 = left1 + 20%x
p.LoadLayout("aks1")
ImageView1.Bitmap=Namayesh
p.Tag = i
If i mod 5 = 0 Then
top1 = top1 + 15%y
scr.Panel.Height = top1 + 15%y
left1 = 1%x
End If

Next

متشکرم