For the full row you may need to do this for each cell in the row.
(Build whatever conditions in there that you need.)
This will handle individual cells in the B4XTable1_DataUpdated sub:
B4X:
For i = 0 To B4XTable1.VisibleRowIds.Size - 1
Dim RowId As Long = B4XTable1.VisibleRowIds.Get(i)
If RowId > 0 Then
Dim pnl As B4XView = onumberColumn.CellsLayouts.Get(i + 1) '+1 because the first cell is the header
Dim row As Map = B4XTable1.GetRow(RowId)
Dim clr As Int
Dim OtherColumnValue As String = row.Get(delveredColumn.Id)
If OtherColumnValue.StartsWith("0") Then clr = xui.Color_Red Else clr = xui.Color_Black
pnl.GetView(0).TextColor = clr
End If
Next