تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
listview
#1
هل يمكن تغير هذا الون الازرق


الملفات المرفقة صورة/صور
   
الرد }}}
تم الشكر بواسطة: سعود
#2
(22-09-16, 07:43 AM)Mohamed20 كتب : هل يمكن تغير هذا الون الازرق
كود :
 ListView1.Items(0).BackColor = Color.Red
السُّعُودِيَّةُ عَبَقٌ يَتَدَفَّقُ فِي ذَاكِرَةِ التَّارِيخِ ، وَحَنِينٌ يَجْرِي فِي أَوْصَالِ الرَّغْبَةِ ، وَعَرَقُ رَجَالٍ يَمْلَأُ أَنْفَاسَ الحَيَاةِ ، وَشَوْقٌ يَغْمُرُ جَنَبَاتِ الفُؤَادِ ، وَغُصْنُ زَيْتُونٍ تَطِيرُ إِلَيْهِ بَلَابِلُ الرُّوحِ.
الرد }}}
تم الشكر بواسطة: Mohamed20 , Mohamed20 , سعود
#3
(22-09-16, 04:07 PM)صبري زينوبي كتب :
(22-09-16, 07:43 AM)Mohamed20 كتب : هل يمكن تغير هذا الون الازرق
كود :
 ListView1.Items(0).BackColor = Color.Red


جزاك الله خير لاكن اخى هذا يغير لون الايتم انا ريدتغير الشريط الذى يحدد الايتم
الرد }}}
تم الشكر بواسطة: سعود
#4
(22-09-16, 11:50 PM)HASAN6.0 كتب : قم بضبط الخاصيه OwnerDrow الى True , ثم اكتب الكود التالي

PHP كود :
Private Sub ListView1_DrawItem(sender As ObjectAs DrawListViewItemEventArgsHandles ListView1.DrawItem
        e
.DrawBackground()
 
       If (e.State And DrawItemState.Selected) = DrawItemState.Selected Then
            e
.Graphics.FillRectangle(Brushes.LightGreene.Bounds)
 
       End If
 
       Using b As New SolidBrush(e.Item.ForeColor)
 
           e.Graphics.DrawString(ListBox1.GetItemText(ListBox1.Items(e.Item.Index)), e.Item.Fontbe.Bounds)
 
       End Using
        e
.DrawFocusRectangle()
 
   End Sub 
Wink
شكرآ لاكن هذه السطر 
         e.Graphics.DrawString(ListBox1.GetItemText(ListBox1.Items(e.Item.Index)), e.Item.Font, b, e.Bounds)
لايمكن استخدامة مع listview
الرد }}}
تم الشكر بواسطة:
#5
(23-09-16, 02:24 AM)HASAN6.0 كتب :
(23-09-16, 01:26 AM)Mohamed20 كتب :
(22-09-16, 11:50 PM)HASAN6.0 كتب : قم بضبط الخاصيه OwnerDrow الى True , ثم اكتب الكود التالي

PHP كود :
Private Sub ListView1_DrawItem(sender As ObjectAs DrawListViewItemEventArgsHandles ListView1.DrawItem
        e
.DrawBackground()
 
       If (e.State And DrawItemState.Selected) = DrawItemState.Selected Then
            e
.Graphics.FillRectangle(Brushes.LightGreene.Bounds)
 
       End If
 
       Using b As New SolidBrush(e.Item.ForeColor)
 
           e.Graphics.DrawString(ListBox1.GetItemText(ListBox1.Items(e.Item.Index)), e.Item.Fontbe.Bounds)
 
       End Using
        e
.DrawFocusRectangle()
 
   End Sub 
Wink
شكرآ لاكن هذه السطر 
         e.Graphics.DrawString(ListBox1.GetItemText(ListBox1.Items(e.Item.Index)), e.Item.Font, b, e.Bounds)
لايمكن استخدامة مع listview

غير كلمة listbox  الى listview

لا اعتقد ان يوجد حدث GetItemText للست فيو هذا مثال اخر

كود :
   Private Sub ListView1_DrawItem(sender As Object, e As DrawListViewItemEventArgs) Handles ListView1.DrawItem
       e.DrawBackground()
       If (e.State And DrawItemState.Selected) = DrawItemState.Selected Then
           e.Graphics.FillRectangle(Brushes.LightGreen, e.Bounds)
       End If
       e.DrawText(TextFormatFlags.Default)
       e.DrawFocusRectangle()
   End Sub
الرد }}}
تم الشكر بواسطة: Mohamed20
#6
الكود كامل اذا احتاجة احد الاخوة

كود :
   Private Sub ListView1_DrawItem(sender As Object, e As DrawListViewItemEventArgs) Handles ListView1.DrawItem
       e.DrawBackground()
       If (e.State And DrawItemState.Selected) = DrawItemState.Selected Then
           e.Graphics.FillRectangle(Brushes.Black, e.Bounds)
       End If
       e.DrawFocusRectangle()
   End Sub

   Private Sub ListView1_DrawColumnHeader(sender As Object, e As DrawListViewColumnHeaderEventArgs) Handles ListView1.DrawColumnHeader
       e.DrawDefault = True
       e.DrawBackground()
   End Sub

   Private Sub ListView1_DrawSubItem(sender As Object, e As DrawListViewSubItemEventArgs) Handles ListView1.DrawSubItem
       e.DrawText(TextFormatFlags.Default)
   End Sub
الرد }}}
تم الشكر بواسطة: Mohamed20 , Abou Eman
#7
(23-09-16, 05:59 AM)أسامة كتب : الكود كامل اذا احتاجة احد الاخوة

كود :
   Private Sub ListView1_DrawItem(sender As Object, e As DrawListViewItemEventArgs) Handles ListView1.DrawItem
       e.DrawBackground()
       If (e.State And DrawItemState.Selected) = DrawItemState.Selected Then
           e.Graphics.FillRectangle(Brushes.Black, e.Bounds)
       End If
       e.DrawFocusRectangle()
   End Sub

   Private Sub ListView1_DrawColumnHeader(sender As Object, e As DrawListViewColumnHeaderEventArgs) Handles ListView1.DrawColumnHeader
       e.DrawDefault = True
       e.DrawBackground()
   End Sub

   Private Sub ListView1_DrawSubItem(sender As Object, e As DrawListViewSubItemEventArgs) Handles ListView1.DrawSubItem
       e.DrawText(TextFormatFlags.Default)
   End Sub

يعمل جيدآ لاكن فى بعد الاوقات يختفى الكلام
الرد }}}
تم الشكر بواسطة:



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


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