تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[كود] اضافة صور الى ListView
#1
كود :
        Dim imgList As ImageList = New ImageList
            With ListView1.Items.Add("Test, imgcount)
                .SubItems.Add("Test0")
                .SubItems.Add("Test1")
   imgList.ImageSize = New Size(20, 20)
               imgList.ColorDepth = System.Windows.Forms.ColorDepth.Depth32Bit
               ListView1.SmallImageList = imgList
               imgList.Images.Add(imgcount, PictureBox1.Image)
               imgcount += 1
End With
المشكلة عن اضافة صورة و عنصر جديد يتم ازالة الصورة القديمة و يتم تغير صورة عنصر فقط  هل من حل ؟
الرد }}}}
تم الشكر بواسطة:
#2
يا أسامة،

جرب هذا الكود، اعمل مشروع جديد وضع فيه ليست فيو وبكشربوكس وزر
PHP كود :
Public Class Form1


    
Private imgList As New ImageList With {.ImageSize = New Size(3232), .ColorDepth System.Windows.Forms.ColorDepth.Depth32Bit}


    Private 
Sub Form1_Load(sender As System.ObjectAs System.EventArgsHandles MyBase.Load
        ListView1
.SmallImageList imgList

    End Sub


    
Private Sub Button1_Click(sender As System.ObjectAs System.EventArgsHandles Button1.Click

        
If Not IsNothing(PictureBox1.ImageThen
            imgList
.Images.Add(PictureBox1.Image)
        
End If

        
Dim itm As New ListViewItem("Test"imgList.Images.Count 1)
        
itm.SubItems.Add("Test0")
        
itm.SubItems.Add("Test1")
        
ListView1.Items.Add(itm)

    
End Sub


    
Private Sub PictureBox1_Click(sender As System.ObjectAs System.EventArgsHandles PictureBox1.Click

        Using op 
As New OpenFileDialog
            op
.Filter "Images (*.jpg;*.png;*.ico)|*.jpg;*.png;*.ico"
            
If op.ShowDialog Windows.Forms.DialogResult.OK Then
                PictureBox1
.Image Image.FromFile(op.FileName)
            
End If
        
End Using

    End Sub


End 
Class 
الرد }}}}
تم الشكر بواسطة: أسامة , أسامة
#3
(28-06-16, 06:39 AM)الوادي كتب : يا أسامة،

جرب هذا الكود، اعمل مشروع جديد وضع فيه ليست فيو وبكشربوكس وزر
PHP كود :
Public Class Form1


    Private imgList 
As New ImageList With {.ImageSize = New Size(3232), .ColorDepth System.Windows.Forms.ColorDepth.Depth32Bit}


 
   Private Sub Form1_Load(sender As System.ObjectAs System.EventArgsHandles MyBase.Load
        ListView1
.SmallImageList imgList

    End Sub


    Private Sub Button1_Click
(sender As System.ObjectAs System.EventArgsHandles Button1.Click

        If Not IsNothing
(PictureBox1.ImageThen
            imgList
.Images.Add(PictureBox1.Image)
 
       End If

 
       Dim itm As New ListViewItem("Test"imgList.Images.Count 1)
 
       itm.SubItems.Add("Test0")
 
       itm.SubItems.Add("Test1")
 
       ListView1.Items.Add(itm)

 
   End Sub


    Private Sub PictureBox1_Click
(sender As System.ObjectAs System.EventArgsHandles PictureBox1.Click

        Using op 
As New OpenFileDialog
            op
.Filter "Images (*.jpg;*.png;*.ico)|*.jpg;*.png;*.ico"
 
           If op.ShowDialog Windows.Forms.DialogResult.OK Then
                PictureBox1
.Image Image.FromFile(op.FileName)
 
           End If
 
       End Using

    End Sub


End 
Class 
جزاك الله خير
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Video [VB.NET] كيف يمكنني عند حدث اضافة تاب جديد نسخ جميع ما فى التاب بالاوامر elhon.tec 1 60 أمس, 03:36 AM
آخر رد: elhon.tec
Wink سؤال في اضافة وسحب اصناف من المخزن khadija_seedi_ali 3 77 08-12-16, 09:07 PM
آخر رد: محمد كريّم
  [VB.NET] اضافة التاريخ في الطباعة في الريبورت فيور hglogtd 8 96 08-12-16, 08:35 PM
آخر رد: ابراهيم النعيمي
  طلب شرح ListView CLARO 4 110 05-12-16, 04:02 PM
آخر رد: CLARO
  اضافة عمود من نوع image ل bound datagridview noway 1 73 17-11-16, 12:08 PM
آخر رد: Genius Live
  كيف يمكن اضافة مجموعة حقول الي datagridview والتعديل عليها مباشرتا dark1459 2 73 15-11-16, 10:30 PM
آخر رد: السرور
  اضافة الاصناف جديد بشرط %Eman% 5 238 09-11-16, 01:39 PM
آخر رد: walkady
  إزالة العناصر من listview Mohamed20 0 58 02-11-16, 11:49 PM
آخر رد: Mohamed20
  ممكن طريقة عرض بيانات على ListView ؟ mmm650 2 126 30-10-16, 10:14 PM
آخر رد: adel27
  ممكن طريقة عرض بيانات على ListView ؟ mmm650 0 56 29-10-16, 08:37 PM
آخر رد: mmm650

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم