Zamiana wszystkich liter w łańcuchu na wielkie lub małe

Aby po kliknięciu przycisku Button1 dokonać konwersji wszystkich liter w łańcuchu AnsiString na wielkie litery i wyświetlić otrzymany łańcuch na etykiecie Label1:

Unit1.cpp

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   AnsiString str = "Zdanie z małymi i WIELKIMI literami";
   Label1->Caption = str.UpperCase();
}

Aby po kliknięciu przycisku Button2 dokonać konwersji wszystkich liter w łańcuchu AnsiString na małe litery i wyświetlić otrzymany łańcuch na etykiecie Label1:

Unit1.cpp

void __fastcall TForm1::Button2Click(TObject *Sender)
{
   AnsiString str = "Zdanie z małymi i WIELKIMI literami";
   Label1->Caption = str.LowerCase();
}