Выравнивание в РичЕдит

← →
Ау (2003-08-28 23:39) [0]

Почему нельзя выравнять в run-time?

procedure TForm1.Button1Click(Sender: TObject);
begin
richedit1.Alignment:=tacenter;
end;

← →
gek © (2003-08-29 07:44) [1]

Если текст выделен, то можно

← →
Ау (2003-08-29 13:57) [2]

Не-а, даже при выделенном тексте не выравнивает! :(
Плиз, кому не сложно! Это делом на пол-минуты - попробуйте у себя - ричэдит и кнопка - и кинте сюда код, а то я себе щас голову сломаю :))))

← →
clickmaker © (2003-08-29 14:40) [3]

RichEdit1.Paragraph.Alignment := taCenter;

← →
Ау (2003-08-29 14:56) [4]

Огромное спасибо! Теперь работает! :)

{ Вдруг у кого-то такае-же головоломка :) }
procedure TfmMain.sbCentreMClick(Sender: TObject);
begin
reInput.WordWrap:=True;
reInput.SelectAll;
reInput.Paragraph.Alignment:=taCenter;
reInput.SetFocus;
end;

Выравнивание в РичЕдит Найти похожие ветки