[مصطفى_ظيمة]

الكود التالى يقوم بإظهار الصورة من Listview فى PictureBox

المشكلة أنه عند عرض الصورة فى الـ PictureBox

تصبح جودتها سيئة عن الصورة الأصلية

كود :

Dim t As New DataTable
           t.Load(dr)
           If t.Rows.Count > 0 Then
               For i As Integer = 0 To t.Rows.Count - 1
                   Dim bytes() As Byte = CType(t(i)("Picture"), Byte())
                   Dim memStream As MemoryStream = New MemoryStream(bytes)
                   Dim img As System.Drawing.Image
                   img = Image.FromStream(memStream)
                   ImageList1.Images.Add(img)


                   With ListView1
                       Dim lvi As New ListViewItem
                       lvi.ImageIndex = i
                       lvi.Text = t(i)("idnam")
                       lvi.Tag = t(i)("id")
                       .Items.Add(lvi)

                   End With

               Next
           End If

 فهل يمكن تعديل الكود لتظهر الصورة بنفس الجودة ؟
ولكم جزيل الشكر مقدما