Hi
I am using the CustomListView class
The text in this tool is spread to the parties
I want to keep it from the edges a little
look at the picture
In ListView1 I used this code to do that
I am pretty sure he is using a customlistview class. He was showing you how he did it when he was using listview.
As you recommended he needs to switch to the latest CustomListView library and remove the class module.
Using CustomListView class is a mistake. You should use xCustomListView library.
You can change the padding of text items with:
B4X:
For i = 0 To clv1.Size - 1
Dim pnl As B4XView = clv1.GetPanel(i)
If pnl.GetView(0) Is Label Then
Dim lbl As Label = pnl.GetView(0)
lbl.Padding = Array As Int(10dip, 0, 10dip, 0)
End If
Next
For i = 0 To clv1.Size - 1
Dim pnl As B4XView = clv1.GetPanel(i)
If pnl.GetView(0) Is Label Then
Dim lbl As Label = pnl.GetView(0)
lbl.Padding = Array As Int(10dip, 0, 10dip, 0)
End If
Next
Things in shape
for example
this is
Hired
lbl.SetBackgroundImage (SetBackgroundImage)
Controls the image, so that the image appears complete throughout
Row
And also this one
lbl.Typeface = MyFont
Specifies the type of font
This is to make the alignment of the text = justify
lbl.Gravity = Bit.Or (Gravity.CENTER, Gravity.FILL)
But it did not work
And maybe others
That's why it is worth listening to my advice
Other things will break. For example when you try to use XUI Views.
Anyway you are of course free to implement it any way you like.