Dim props As xnGridCellProps
TimeGrid_CellProps(2 , 1, "0", props)
End If
End Sub
Sub TimeGrid_CellProps (aCol As Int , aRow As Int , aValue As String , aProps As xnGridCellProps )
If aCol = 2 Then
If aRow = 1 Then
aProps.BackGroundColor = Colors.Red
End If
End If
End Sub