Помогите исправить ошибки в игре Пятнашки

#define WC 48
#define HC 48
int pole [4] [4]; //игровое поле
int ex, ey; //координаты пустой клетки
 
//void TForm1::TForm1 (TComponent* Owner):: TForm (Owner)
//{ Form1->Font->Size = 12;}
 
//начало работы программы
void  Form1::FormShow (Object *Sender)
{
    NewGame ();
}
// новая игра
void  Form1::NewGame()
{
    //установить размер формы
    ClientWidth = WC * 4; // HFJEJFNSJENFJENBF
    ClientHeight = HC * 4;
 
    // исходное (правильное) положение фишек
    int k=1;
    for (int i=0; i<4; i++)
        for (int j=0; j<4; j++)
            pole [i][j] = k++;
    Mixer(); //перемешать фишки
    ShowPole(); //отобразить игровое поле
}
 
//перемешивает фишки
void  Form::Mixer()
{
    int x1,y1; //пустая клетка
    int x2,y2; // эту переместить в пустую
    int d;
 
    Randomize();
 
    x1 = 3; y1 = 3; // см. описание массива std
    for (int i = 0; i < 150; i++) //количество перестановок
    {
        do {
            x2 = x1;
            y2 = y1;
            /*выберем фишку, примыкающую к пустой клетке, которую переместим
            в пустую клетку*/
            d = RandomRange (1,5);
            switch (d) {
                case 1: x2--; break;
                case 2: x2++; break;
                case 3: y2--; break;
                case 4: y2++; break;
            }
        } while ((x2<0) || (x2 >= 4) || (y2 <0) || (y2>=4));
 
        /* здесь определили фишку, которую надо переместить в пустую клетку */
 
pole [y1][x1] = pole [y2][x2];
pole [y2][x2] = 16;
x1=x2;
y1=y2;
    };
    //запомним координаты пустой клетки
    ex = x1;
    ey = y1;
}
 
// отображает на поверхности формы игровое поле
 
void  Form1::ShowPole()
{
    int x,y; //координаты левого верхнего угла клетки
 
    for (int i=0; i<4; i++)
        for (int j=0; j<4; j++)
        {
            x = j*HC;
            y = i*WC;
            if (pole[i][j] != 16) {
                Canvas->Brush->Color = clBtnFace;
                Canvas->Rectangle(x,y, x+WC-1);
                Canvas->TextOutA(x+15,y+10,
                                 IntToStr  (pole[i][j]));
            }
        }
}
 
bool Finish(); //проверяет, правильно ли размещены фишки
 
//щелчок в клетке
void  Form1::FormMouseDown (TObject *Sender,
                      MouseButton Button, ShiftState Shift,
                      int X, int Y)
{
    int cx,cy; //координаты клетки
 
 
сх = X / WC;
cy = Y / HC;
 
//переместить выбранную клетку в соседнюю свободную
if (( abs(cx - ex) == 1 && cy-ey == 0  ) ||
    (abs(cy-ey) == 1 && cx-ex == 0))
{
    //переместить фишку из сх,су в ех, еу
    pole [ey][ex] = pole [cy][cx];
pole [cy][cx] = 16;
ex =cx;
ey = cy;
ShowPole(); //отрисовать поле
if ( Finish ())
{
    ShowPole();
int r = MessageDlg ("Цель достигнута! Еще раз?",
                    mtInformation, MsgDlgButtons() << mbYes
                                                   << mbNo, 0);
if (r == mrNo)
Form1->Close(); //завершить работу программы
else
{
    NewGame();
    ShowPole();
}
}
}
}
 
/*проверяет, расположены ли клетки (фрагменты картинки)
в нужном порядке */
bool Finish()
{
    bool result;
    int row, col;
    int k=1;
 
    result = true; //пусть фишки в нужном порядке
    for (row = 0; row<4; row++)
    {
        for (col = 0; col<4; col++)
            if ( pole[row][col] ==k)
                k++;
            else {
                result = false;
                break;
            }
            if (!result) break;
    }
 
return (result);
};
 
//обработка события Paint
void  Form1::FormPaint (Object *Sender)
{
    showPole();
}
             }
    };
}