Wish CustomListView.AddTextClr

Erel said:

Using ListView is not simpler than using CustomListView (CLV.AddTextItem).

Click to expand...

LucaMs said:

CLV.AddTextItemClr(Text As Object, Value As Object, Clr As Int)
where Clr is the text color, of course.

Click to expand...

For i=0 To MyList.Size -1
        clv1.AddTextItem(MyList.Get(i), MyList.Get(i))
        Dim p As B4XView = clv1.GetPanel(i)  
        p.GetView(0).TextColor=xui.Color_Blue
    Next

Mahares said:

Why would you need a new methos when you can...

Click to expand...

'Mahares' code:
For i=0 To MyList.Size -1
    clv1.AddTextItem(MyList.Get(i), MyList.Get(i))
    Dim p As B4XView = clv1.GetPanel(i)
    p.GetView(0).TextColor=xui.Color_Blue
Next



For i=0 To MyList.Size -1
    clv1.AddTextItemClr(MyList.Get(i), MyList.Get(i), Xui.ColorBlue)
Next
'(or using a list of colors or alternating colors).

LucaMs said:

Having a method that allows you to directly choose the color of the text added

Click to expand...

Mahares said:

I knew before I posted that I was not going to convince you.

Click to expand...

LucaMs said:

but you have to admit that if you can replace it with a single line

Click to expand...

Mahares said:

What is wrong in setting it up in the Designer. It works. textcolor

Click to expand...