منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : عرض الصور في الليست فيو و إجراء البحث من خلال الضغط على الصورة المعروضة
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم
عيد مبارك للجميع و كل عام و انتم بخير
في المثال المرفق طريقة لعرض الصور في الليست فيو وهذا المثال لأحد الأعضاء بارك الله فيه و جزاه الله خيرا
المطلوب هو كيف يمكنني ان اجري البحث عند الضغط على صورة موجودة في الليست فيو ليتم عرض النتيجة في التكست بوكس او الداتاقريد مثلا
في الاجراء 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 ObjectAs MouseEventArgsHandles 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 
اخي Beginer بارك الله فيك و زادك الله من العلم و الحكمة
الشيئ الملاحظ هو ان جودة الصورة الموجودة على الليست فيو ضعيفة مقارنة مع الصورة الموجودة على PictureBox
هل يوجد طريقة للحفاظ على الجودة ؟
السلام عليكم اخي الكريم 
بطبيعة الحال الصور الموجودة في ليست فيو تكون صغيرة الحجم ولايمكن مقارنتها مع صورة كبيرة
اخي ابراهيم اييو
اصلا الصور الموجودة في قواعد البيانات مقاسها صغير (200 على 140) فهل هذا المقاس يعتبر كبير بالنسبة لليست فيو
السلام عليكم اخي الكريم

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

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