Try
TableView1.Items.Add(row)
Dim lst As List
lst.Initialize
Dim r As RandomAccessFile
lst=TableView1.Items
r.Initialize(Main.AYAR.DirProsesad,ComboBox1.Value&".lst",False)
r.WriteB4XObject(lst, 0)
r.Close
'tale rows has
' CheckBox + Boolean + string + integer values
Catch
fx.Msgbox(MForm,Main.AYAR.DirProsesad&"\"&ComboBox1.Value&".lst" & " DOSYA KULLANIMDA,TEKRAR DENEYİNİZ" &CRLF & LastException,"KAYIT BAŞARISIZ")
Log (LastException)
Return
End Try