Цитата:
|
Сообщение от PS11011010
Код:
for i := 0 to RichEdit1.Lines.Count - 1 do
if MaxWidth < RichEdit1.Canvas.TextWidth(RichEdit1.Lines.Strings[i]) then
MaxWidth := RichEdit1.Canvas.TextWidth(RichEdit1.Lines.Strings[i]);
Вроде ничего не наврал...
Так ты получишь ширину самой длинной строки. |
Верю вам, что вы ведёте меня в верном направлении.
А что мне делать дальше, имея ширину самой длинной строки.
И вообще может получиться так, что каждая строка не помещается в одну линию. Тогда надо все их уменьшать.