I am populating a ListView from a SQLite table.
All OK and images and text loads.
Is there a way I can place a "separator line" between the items?
My Code:
All OK and images and text loads.
Is there a way I can place a "separator line" between the items?
My Code:
B4X:
For i=0 To Curs.RowCount-1
Curs.Position=i
Dim Buffer() As Byte
Dim PartnersHeader As String
Dim PartnerText As String
Buffer = Curs.GetBlob("partnerimage")
PartnersHeader = Curs.GetString("partnername")
PartnerText = Curs.GetString("partnertext")
Dim InputStream1 As InputStream
InputStream1.InitializeFromBytesArray(Buffer, 0, Buffer.Length)
Dim Bitmap1 As Bitmap
Bitmap1.Initialize2(InputStream1)
InputStream1.Close
lvPartners.TwoLinesAndBitmap.ItemHeight = 120dip
lvPartners.TwoLinesAndBitmap.ImageView.Height = 120dip
lvPartners.TwoLinesAndBitmap.ImageView.Width = 120dip
lvPartners.TwoLinesAndBitmap.Label.TextColor=Colors.Black
lvPartners.TwoLinesAndBitmap.Label.TextSize = 20
lvPartners.TwoLinesAndBitmap.Label.Left = (((lvPartners.TwoLinesAndBitmap.ImageView.Left) + (lvPartners.TwoLinesAndBitmap.ImageView.Width)) + 5dip)
lvPartners.AddTwoLinesAndBitmap((" " & CRLF & PartnersHeader), " " & PartnerText , Bitmap1)
Next