Прорисовка игрового поля в builder c++

[Зубофон]

Доброго времени суток. Нужно прорисовать поле(8x8 клеток) для игры "шашки" в форме(builder c++), объясните пожалуйста подробно, каким образом это сделать. Перерыл довольно много источников, но так толком ничего не понял

[DpolenST]

void __fastcall TForm1::Button1Click(TObject *Sender)
{
int x=50, y=50; // координаты левого верхнего угла шахматного поля
int sh=40;      // размер клетки  


// рисуем поле
 for(int i=0;i<8;i++)
  {
   for(int j=0;j<8;j++)
    {
      if((i*7+j)%2) Canvas->Brush->Color=(TColor)RGB(0,0,0);  // выбираем цвет заливки клетки
      else Canvas->Brush->Color=(TColor)RGB(255,255,255);

      TRect tRect(x+sh*i,y+sh*j,x+sh*(i+1),y+sh*(j+1));     // выбираем зону заливки
      Canvas->FillRect(tRect);                              // заливаем выбранным цветом

      Canvas->Brush->Color=(TColor)RGB(128,128,128);  // задаем цвет обводки
      //tRect.right++; tRect.bottom++; // сдвиг правой и нижней границы (чтобы рамки между клетками не сдваивались)
      Canvas->FrameRect(tRect);                       // обводим клетку
    }
  }


// добавляем текст
 AnsiString bkv = "ABCDEFGH";
 AnsiString num = "87654321";
 Canvas->Font->Color=clBlack;   // цвет текста
 Canvas->Brush->Color=clBtnFace;  // цвет фона
 Canvas->Font->Size=12;   // размер шрифта
 TFontStyles tFontStyle;
 tFontStyle <<  fsBold;   // жирный
 Canvas->Font->Name="Arial";  // имя шрифта

 for(int i=0;i<8;i++)
  {
    Canvas->TextOutA(x+sh*i+sh/2-5,y-20,bkv[i+1]);      // вывод букв сверху
    Canvas->TextOutA(x+sh*i+sh/2-5,y+sh*8+2,bkv[i+1]);  // вывод букв снизу
    Canvas->TextOutA(x-20,y+sh*i+sh/2-5,num[i+1]);      // вывод цифр слева
    Canvas->TextOutA(x+sh*8+10,y+sh*i+sh/2-5,num[i+1]); // вывод цифр справа
  }
}