Sub DevicesTV_SelectedCellChanged (RowIndex As Int, ColIndex As Int, Cell As Object)
If Not(mapEditedColumns.IsInitialized) Then mapEditedColumns.Initialize
If mapEditedColumns.GetDefault(RowIndex & "_" & ColIndex, 0) = 0 Then
Log("Not Edited")
mapEditedColumns.Put(RowIndex & "_" & ColIndex, 1)
Log("Actual Row: " & ColIndex & " Column: " & ColIndex)
If ColIndex=0 Then Return
Dim actualrow(DevicesTV.ColumnsCount) As Object = DevicesTV.Items.Get(RowIndex)
Dim tf As TextField
tf.Initialize("")
tf.Text=Cell
actualrow(ColIndex)=tf
Log("Changed: " & ColIndex)
actualrow(ColIndex)=tf
DevicesTV.SingleCellSelection = False
DevicesTV.Items.Set(RowIndex,actualrow)
DevicesTV.SingleCellSelection = True
DevicesTV.SelectCell(RowIndex,ColIndex)
Else
Log("Edited")
End If
End Sub