Casse brique

void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
Refresh();
Canvas->Brush->Color = clYellow;
Canvas->Pen->Color = clBlue;
Canvas->Ellipse(X,Y,X+10,Y+10);
X=X+A;Y=Y+B;
if(Y<0){B=-B;}//equation de trajectoire de la balle au contact du mur
if(X>1020){A=-A;}
if(X<0){A=-A;}
Canvas->Brush->Color = clGray;
Canvas->Pen->Color = clBlue;
Canvas->Rectangle(C,D,C+200,D+20);
if(X>C)                  //equation de trajectoire de la balle au contact de la raket
        {if(X<C+200)
                {if(Y+10>D)
                        if(Y<D)
                        {
                        {if(X<C+25){A=-2.8*2;B=-0.8*2;}
                 else
                        {if(X<C+50){A=-2.3*2;B=-1.7*2;}
                 else
                        {if(X<C+75){A=-1.7*2;B=-2.3*2;}
                 else
                        {if(X<C+100){A=-0.8*2;B=-2.8*2;}
                 else
                        {if(X<C+125){A=0.8*2;B=-2.8*2;}
                 else
                        {if(X<C+150){A=1.7*2;B=-2.3*2;}
                 else
                        {if(X<C+175){A=2.3*2;B=-1.7*2;}
                 else
                        {A=2.8*2;B=-0.8*2;}
                        }}}}}}}}}}
for(i=0;i<20;i++)               //briques c'est la que je ferais ce que tu m'as dis
        {
                for(j=1;j<3;j++)
                {
                        Canvas->Brush->Color = clRed;
                        Canvas->Pen->Color = clBlue;
                        Canvas->Rectangle(i*50,j*20,(i+1)*50,(j+1)*20);

                }
        }
}

void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift,
      int X, int Y)
{

if(X<925)         //mouvement de la raket
        {if(X>100)
                {
                C=X-100;
                }
        }