Неверно работает закрашивание ячеек

int max2 = NewGird->RowCount;
for (int ii = 1; ii < 3; ii++)
{
for (int jj = 1; jj < max2; jj++)
    {
    if (NewGird->Cells[jj][ii]== "")
        {
        NewGird->Canvas->Brush->Color=clRed;
        NewGird->Canvas->FillRect(NewGird->CellRect(ii, jj));
        }
    }
}

// if (NewGird->Cells[jj][ii]== "")
if (NewGird->Cells[ii][jj]== "")

void __fastcall TForm5::NewGirdDrawCell(TObject *Sender, int ACol, int ARow, TRect &Rect,
          TGridDrawState State)
{
//int max2 = NewGird->RowCount;
//for (int ii = 1; ii < 3; ii++)
    {
    //for (int jj = 1; jj < max2; jj++)
        {
        if (NewGird->Cells[ACol][ARow]== "")
            {
            NewGird->Canvas->Brush->Color=clRed;
            NewGird->Canvas->FillRect(NewGird->CellRect(ACol, ARow));
            }
        }
    }
}

        if (NewGird->Cells[ACol][ARow]== "")
            {
            NewGird->Canvas->Brush->Color=clRed;
            NewGird->Canvas->FillRect(Rect); // Лишние вызовы-то зачем?
            }