تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] كيف اجعل صف في listbox ملون
#1
السلام عليكم
كيف ممك اجعل صف ملون من لست بوكس
وشكرا

مع العلم انا وضعت
كل الاحتمالات لم تنفع بشئ
.listbox.item.add(textbox1.backcolor=color.red)
الرد }}}}
تم الشكر بواسطة:
#2
يجب عليك أن تتعامل مع الحدث ListBox_DrawItem
و ترسم Item باللون المطلوب
لاتنسي تغيير DrawMode Property

في اللينك التالي ستجد فكرة تغيير اللون بناء علي Index
اللينك


عموما: الحل المثالي انك تقوم ببناء اداة جديدة يتم توريثها من الأداة ListBox و تعيد عملية الرسم في الحدث DrawItem

هذا مثال لكيفية بناء ليست بوكس بسيط و يمكنك التعديل عليه و تطويره

PHP كود :
Public Class BoxList
    Inherits ListBox

    Public Sub 
New()
 
       Me.DrawMode DrawMode.OwnerDrawFixed
        Me
.ItemHeight 16
    End Sub

    Protected Overrides Sub OnDrawItem
(As DrawItemEventArgs)
 
       e.DrawBackground()
 
       e.DrawFocusRectangle()
 
       ' ****************************************************
        ' 
يمكنك التحكم في الون من الكود التالي
        Dim limeColor 
As Color Color.DarkBlue
        
' يمكنك التحكم في مكان رسم التكست من هنا
        Dim indent As Single = 5
        ' 
****************************************************

 
       If e.Index 0 OrElse e.Index >= MyBase.Items.Count Then
            e
.Graphics.DrawString(Me.Texte.Font, New SolidBrush(e.ForeColor), CSng((e.Bounds.Left indent)), CSng(e.Bounds.Top))
 
       Else
            e
.Graphics.DrawString(MyBase.Items(e.Index).ToString(), e.Font, New SolidBrush(limeColor), CSng((e.Bounds.Left indent)), CSng(e.Bounds.Top))
 
       End If
 
       MyBase.OnDrawItem(e)
 
   End Sub

End 
Class 
الرد }}}}
تم الشكر بواسطة: LoveVb , 3asfa~mdmra , العزابي , العزابي


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] كيف اجعل البرنامج يحفظ بيانات؟ The Light Fire 9 129 أمس, 12:58 AM
آخر رد: ali.alfoly
  [سؤال] كيف اجعل برنامج يفتح ملف نصي The Light Fire 5 93 04-12-16, 12:37 AM
آخر رد: ali.alfoly
  تقسيم text الى عدة listbox rabeh.ram 4 106 22-11-16, 12:06 AM
آخر رد: rabeh.ram
  مساعدة بخصوص Listbox CLARO 3 79 16-11-16, 06:15 PM
آخر رد: silverlight
  [سؤال] حفظ النص المكتوب داخل listBox فارس جراح 7 114 15-11-16, 04:00 AM
آخر رد: LoveVb
  [VB.NET] قاعدة بيانات و listbox rabeh.ram 2 119 05-11-16, 02:51 AM
آخر رد: rabeh.ram
Bug [VB.NET] مـساعدة بخـصوص Listbox 3asfa~mdmra 6 90 04-11-16, 07:33 PM
آخر رد: silverlight
  اريد اجعل برنامجي يقبل اي نت فيرم ورك thevirus 2 114 31-10-16, 09:24 AM
آخر رد: thevirus
  [VB.NET] كيف ممكن اجعل هذا الاتصال بتصل بip مختلف عن ip اتصالي 3asfa~mdmra 0 57 27-10-16, 09:56 PM
آخر رد: 3asfa~mdmra
  كيف اجعل برنامجى المصمم بالفيجوال ستوديو 2012 يعمل على ويندوز 10 : 64 بيت nabil.1710 7 181 18-10-16, 03:15 AM
آخر رد: nabil.1710

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


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