Проблема перемещения компонентов по главной форме

TFCard *Card[36];

void Init_Koloda(void)
{
  Graphics::TBitmap *Bitmap = new Graphics::TBitmap();  //-- этот битмап будет передавать jpeg файлы в карты

  int a=6; // номинал карты

      for(int i = 0; i < 36; i++)
      {
        Card = new TFCard(FMain);
         Card->Parent=FMain;           // создаем колоду из 36 карт
                Bitmap->Assign(JPeg);
                Card->Face->Picture->Assign(Bitmap);    // загружаем в каждую карту ее лицо
                Bitmap->Assign(JPeg[36]);                   // рубашку
                Card->Shirt->Picture->Assign(Bitmap);   //
        if (i<9) { Card->Krest=true; Card->Nominal=a;   a++; }     // устанавливаем масти и номиналы
            if (i>8 && i<18) { Card->Pika=true; Card->Nominal=a;  a++; }
                if (i>17 && i<27) { Card->Chirva=true; Card->Nominal=a;   a++; }
                    if (i>26 && i<36) { Card->Bubna=true; Card->Nominal=a;  a++; }
              if (a==15) { a=6; }
      }
      for (int i = 0; i < 37; i++) {    delete JPeg;  }  // удаляем изображения лиц карт
      for (int i = 0; i < 36; i++) {    Card->Visible=true; Card->Left=-100;
            Card->Top=120; }

//------ Перемещение карт игроками на игре когда идет игра и они ходят ------------------------                 
           if(Moves_Card==true) {          
   
for (int i = 0; i < (10+FSetup->TrackBar1->Position); i++)
{                      
                      // перемещение по горизонтали
 if(mov_card_x[tt] < Card[mov_card[tt]]->Left) { Card[mov_card[tt]]->Left--; }
                     // перемещение по горизонтали
 if(mov_card_x[tt] > Card[mov_card[tt]]->Left) { Card[mov_card[tt]]->Left++; }
                     //  перемещение по вертикали
 if(mov_card_y[tt] < Card[mov_card[tt]]->Top) {Card[mov_card[tt]]->Top--;}

 if(mov_card_y[tt] > Card[mov_card[tt]]->Top) {Card[mov_card[tt]]->Top++;}

      // проверка достигла ли карта нужной точки - если да берем след ячейку массива
 if(mov_card_x[tt] == Card[mov_card[tt]]->Left && mov_card_y[tt] == Card[mov_card[tt]]->Top) {tt++; }

         if(tt == kk)
        {
        Moves_Card=false;
        tt=0;kk=0;
       
              }
          break;
         }
}
                               }