Label1->Caption = "";
        for(i = 0; i < 10; i++)
                Label1->Caption = Label1->Caption + IntToStr(a[i]);