Sub ExecuteListView(SQL As SQL, Query As String, StringArgs() As String, Limit As Int, ListView1 As ListView, TwoLines As Boolean)'ignore
ListView1.Clear
Dim Table As List
Table = ExecuteMemoryTable(SQL, Query, StringArgs, Limit)
Dim Cols() As String
For i = 0 To Table.Size - 1
Cols = Table.Get(i)
If TwoLines Then
ListView1.AddTwoLines2(Cols(0), Cols(1), Cols)
Else
ListView1.AddSingleLine2(Cols(0), Cols)
Log(Cols(0))
End If
Next
End Sub