Textausrichtung festlegen
Nach oben zu Mit Steuerelementen arbeiten - Index
In einer RTF- oder Memokomponente kann Text linksbündig, rechtsbündig oder zentriert ausgerichtet werden. Um die Textausrichtung zu ändern, weisen Sie der Eigenschaft Alignment der Textkomponente einen anderen Wert zu. Diese Einstellung wird jedoch nur verwendet, wenn die Eigenschaft WordWrap (Wortumbruch) den Wert True hat. Bei deaktiviertem Umbruch steht kein Rand für die Ausrichtung zur Verfügung.
Beispielsweise verknüpft der folgende Quelltext eine Behandlungsroutine für das Ereignis OnClick zuerst mit dem Menübefehl Character > Left und anschließend mit den Menübefehlen Character > Right sowie Character > Center.
procedure TForm.AlignClick(Sender: TObject);
begin
Left1.Checked := False; { Markierungen aufheben }
Right1.Checked := False;
Center1.Checked := False;
with Sender as TMenuItem do Checked := True; { Angeklickten Eintrag markieren }
with Editor do { dann Ausrichtung entsprechend ändern }
if Left1.Checked then
Alignment := taLeftJustify
else if Right1.Checked then
Alignment := taRightJustify
else if Center1.Checked then
Alignment := taCenter;
end;
switch(reinterpret_cast<int>(RichEdit1->Paragraph->Alignment))
{
case 0: LeftAlign->Down = true; break;
case 1: RightAlign->Down = true; break;
case 2: CenterAlign->Down = true; break;
}
Sie können zudem mit der Eigenschaft HMargin den linken und den rechten Rand einer Memokomponente einstellen.