Wyrównanie tekstu

Aby po kliknięciu przycisku Button1 tekst całego dokumentu został wyrównany:

do lewej:

Unit1.cpp

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   RichEdit1->Alignment = taLeftJustify;
}

do środka:

Unit1.cpp

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   RichEdit1->Alignment = taCenter;
}

do prawej:

Unit1.cpp

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   RichEdit1->Alignment = taRightJustify;
}

Aby po kliknięciu przycisku Button1 tekst akapitu został wyrównany:

do lewej:

Unit1.cpp

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   RichEdit1->Paragraph->Alignment = taLeftJustify;
}

do środka:

Unit1.cpp

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   RichEdit1->Paragraph->Alignment = taCenter;
}

do prawej:

Unit1.cpp

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   RichEdit1->Paragraph->Alignment = taRightJustify;
}