void __fastcall TForm1::StartGameClick(TObject *Sender)
{
    Form1->Background->Hide();
    Imagine[0]=Image0;
    Imagine[1]=Image1;
    Imagine[2]=Image2;
    Imagine[3]=Image3;
    Imagine[4]=Image4;
    Imagine[5]=Image5;
    Imagine[6]=Image6;
    Imagine[7]=Image7;
    Imagine[8]=Image8;
    Imagine[9]=Image9;
    Imagine[10]=Image10;
    Imagine[11]=Image11;
    Imagine[12]=Image12;
    Imagine[13]=Image13;
    Imagine[14]=Image14;
    Imagine[15]=Image15;
    Imagine[16]=Image16;
    Imagine[17]=Image17;
    Imagine[18]=Image18;
    Imagine[19]=Image19;
    Imagine[20]=Image20;
    Imagine[21]=Image21;
    Imagine[22]=Image22;
    Imagine[23]=Image23;
    Imagine[24]=Image24;
    Imagine[25]=Image25;
    Imagine[26]=Image26;
    Imagine[27]=Image27;
    Imagine[28]=Image28;
    Imagine[29]=Image29;
    Imagine[30]=Image30;
    Imagine[31]=Image31;

    l.Amesteca(carte);

    for(int i=0; i<32; i++) {
     ImageList1->Draw(Imagine[i]->Canvas,0,0, carte[i]);
     }

    Timer1->Enabled=true;

}