Высчитать наибольший по площади прямоугольник, состоящий из единиц и подсветить (выделить) его

const int height = 3;
const int width = 7;
 
int g_array[height][width] = { {0, 1, 0, 0, 1, 0, 1},
                               {0, 1, 0, 1, 1, 1, 0},
                               {0, 0, 1, 1, 1, 1, 0} };
 
bool IsGood( int x1, int x2, int y1, int y2 );
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
        int max_x1 = 0, max_x2 = 0, max_y1 = 0, max_y2 = 0;
        int max_square = 0, square = 0;
 
        for ( int x1 = 0; x1 < width; x1++ )
        {
                for ( int y1 = 0; y1 < height; y1++ )
                {
                        for ( int x2 = x1+1; x2 < width; x2++ )
                        {
                                for ( int y2 = y1+1; y2 < height; y2++ )
                                {
                                        if ( IsGood(x1, x2, y1, y2) )
                                        {
                                                square = (x2 - x1 + 1) * (y2 - y1 + 1);
                                                if ( square > max_square )
                                                {
                                                        max_square = square;
                                                        max_x1 = x1;
                                                        max_x2 = x2;
                                                        max_y1 = y1;
                                                        max_y2 = y2;
                                                }
                                        }
                                }
                        }
                }
        }
        Memo1->Lines->Add( "max_square = " + (AnsiString)(max_square) );
        Memo1->Lines->Add( "max_x1 = " + (AnsiString)(max_x1+1) );
        Memo1->Lines->Add( "max_x2 = " + (AnsiString)(max_x2+1) );
        Memo1->Lines->Add( "max_y1 = " + (AnsiString)(max_y1+1) );
        Memo1->Lines->Add( "max_y2 = " + (AnsiString)(max_y2+1) );
}
//---------------------------------------------------------------------------
 
bool IsGood( int x1, int x2, int y1, int y2 )
{
        for ( int x = x1; x <= x2; x++ )
        {
                for ( int y = y1; y <= y2; y++ )
                {
                        if ( !g_array[y][x] ) return false;
                }
        }
 
        return true;
}