[larbihamri]

السلام عليكم
عيد مبارك للجميع و كل عام و انتم بخير
في المثال المرفق طريقة لعرض الصور في الليست فيو وهذا المثال لأحد الأعضاء بارك الله فيه و جزاه الله خيرا
المطلوب هو كيف يمكنني ان اجري البحث عند الضغط على صورة موجودة في الليست فيو ليتم عرض النتيجة في التكست بوكس او الداتاقريد مثلا

[Beginer]

في الاجراء Showimageinlistview أضف السطر التالي تحت With Lvi هكذا

PHP كود :

With Lvi
    .Tag = ds.Tables(0).Rows(x).Item("car_id") 


ثم أضف هذا الكود الخاص بالأداة ListView وهو نفس الكود في ListBox1_MouseClick باختلاف جزء بسيط في السطر الأول

PHP كود :

Private Sub ListView1_MouseClick(sender As Object, e As MouseEventArgs) Handles ListView1.MouseClick
    Dim dp As New OleDbDataAdapter("select * from Table1 where car_id =" & ListView1.SelectedItems(0).Tag & " ", conn)
    Dim ds As New DataSet

    dp.Fill(ds)

    If ds.Tables(0).Rows.Count <> 0 Then

        TXTID.Text = ds.Tables(0).Rows(0).Item(0)
        TextBox1.Text = ds.Tables(0).Rows(0).Item(1)
        TextBox2.Text = ds.Tables(0).Rows(0).Item(2)
        TextBox3.Text = ds.Tables(0).Rows(0).Item(3)

        PictureBox1.DataBindings.Clear() : PictureBox1.DataBindings.Add("Image", ds.Tables(0), "car_image", True)

    Else

        MsgBox("السجل غير موجود", 64, "Program Name")

    End If

    dp.Dispose()
End Sub 


[larbihamri]

اخي Beginer بارك الله فيك و زادك الله من العلم و الحكمة

[larbihamri]

الشيئ الملاحظ هو ان جودة الصورة الموجودة على الليست فيو ضعيفة مقارنة مع الصورة الموجودة على PictureBox
هل يوجد طريقة للحفاظ على الجودة ؟

[ابراهيم ايبو]

السلام عليكم اخي الكريم 

بطبيعة الحال الصور الموجودة في ليست فيو تكون صغيرة الحجم ولايمكن مقارنتها مع صورة كبيرة

[larbihamri]

اخي ابراهيم اييو
اصلا الصور الموجودة في قواعد البيانات مقاسها صغير (200 على 140) فهل هذا المقاس يعتبر كبير بالنسبة لليست فيو

[ابراهيم ايبو]

السلام عليكم اخي الكريم

انت تاخذ الصور من imageList وهي مقاساتها صغيرة 16*16 او 24*25 >>>>>> 64&64 وهذا حجم كبير 

وهي عبارة عن ايقونة