procedure TForm4.SpeedButton4Click(Sender: TObject);
begin try
Editor.Paragraph.Alignment := TParaAlignment(TControl(Sender).Tag);
except end;End;