13-02-17, 01:49 AM
المشكلة فى اداه listview view largeicon
اريد استخدام خاصية drawitem لاضافة بعض الصور لان imagelist يعلق المشروع عند اضافة الكثير من items
الناتج عن هذا الكود فى الصور المشكلة ف DrawString ان اذا كان الاسم طويل فى العادة دون استخدام خاصية DrawItem يتم تنظيم String size و للتوضيح فى الصور هل ممكن ضبط string size كما فى طبيعة listview ?
اريد استخدام خاصية drawitem لاضافة بعض الصور لان imagelist يعلق المشروع عند اضافة الكثير من items
كود :
Private Sub ListView1_DrawItem(sender As Object, e As DrawListViewItemEventArgs) Handles ListView1.DrawItem
Dim imageRect = New Rectangle(e.Bounds.X, e.Bounds.Y, e.Bounds.Height, e.Bounds.Height)
Dim img As String = Application.StartupPath + "\Data\" & e.Item.SubItems(1).Text & ".png"
If IO.File.Exists(img) Then
e.Graphics.DrawImage(Image.FromFile(img), imageRect)
Else
e.Graphics.DrawImage(Image.FromFile(Application.StartupPath & "\Data\error.png"), imageRect)
End If
e.Graphics.DrawString(e.Item.Text, e.Item.Font, New SolidBrush(e.Item.ForeColor), (e.Item.Bounds.Location.X + 5), e.Item.Bounds.Location.Y + 35)
End Sub