Wyświetlanie na etykiecie losowo wybranej liczby

Aby po kliknięciu przycisku Button1 na etykiecie Label11 wyświetlić losowo wybraną liczbę z podanego zakresu:

Unit1.cpp

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   randomize();
   int losowa = random(6) + 1;
   Label1->Caption = IntToStr(losowa);
}

W naszym przykładzie otrzymana liczba będzie zawsze z przedziału <1, 6>.