### Customized ListView with TextFields

This is an example of building a Customized ListView with TextField Controls.
`Sub Process_Globals
Private fx As JFX
Private MainForm As Form
Private listviewMain As ListView
End Sub`
`Sub AppStart (Form1 As Form, Args() As String)
MainForm = Form1
MainForm.RootPane.LoadLayout("Main")
MainForm.SetFormStyle("UTILITY")
MainForm.Show
For i = 0 To 100
Dim editfield As TextField
editfield.Initialize("ListviewEditField")
editfield.Text = "Item " & i
listviewMain.Items.Add(editfield)
Next
End Sub`
`Private Sub ListviewEditField_MouseClicked (EventData As MouseEvent)
Dim editfield As TextField = Sender
Log($"TextField: ${editfield.Text} was clicked"$)
End Sub`
`Sub listviewMain_SelectedIndexChanged(Index As Int)
Dim editfield As TextField = listviewMain.Items.Get(Index)
Log($"TextField: ${editfield.Text}"$)
End Sub`
Example Save ListView TextField Content to Textfile
Dim l As List
l.Initialize
For i = 0 To listviewMain.Items.Size - 1
Dim editfield As TextField = listviewMain.Items.Get(i)
l.Add(editfield.Text)
Next
File.WriteList(File.DirApp, "mylist.txt", l)

Changed: , Category: ListView, File: T6C216M1587.htm, ID: 1587