Как осуществить перенос текста в RichEdit (KOL)

← →
Dimon (2004-03-04 13:53) [0]

перенос текста в RichEdit (KOL)

← →
Gandalf © (2004-03-05 12:57) [1]

В смысле?

← →
4kusNick © (2004-04-11 22:59) [2]

Спросите у Delphi5.01

← →
Delphi5.01 © (2004-04-12 08:56) [3]

Уважаемый Гендельф
Нас вот заинтересовала проблема WordWrap-а в RichEdit, как всегда, все программисты думают что если изменить метод делания какой то операции то их компонент становится круче. Как например почему всем известное свойство RichEdit.WordWrap стало ReadOnly. Или например в BitMap-е рисовать DrawTransparent, вместо стандартного, плюс новый метод рисования сохраняет маску, и при каждом новом рисовании рисует старой маской, ну ладно это уже другая история.
Мне кажется с этим вопросом нужно прямо Владимиру обращаться, я например не вижу необходимости изменения WordWrap-а в ReadOnly. Может он нам подскажет?
Спасибо за внимание :-)

← →
Gandalf © (2004-04-12 11:25) [4]

1) Я не понял - меня в чем-то укоряют?
2) А ПОЧЕМУ ВЫ РЕШИЛИ ЧТО WORDWARP ДЕЛАЕТ ПЕРЕНОС ПО СЛОВАМ ДЛЯ RichEdit??? Кто вам это сказал? Оно никакого отношения в RichEdit НЕ имеет. А то что оно readonly вполне очевидно - этот стиль не меняется на лету.
3) Насчет DrawTransparent - в KOL есть ошибки, возможно это одна из них.

2 Dimon
Vot nashol :-)

unit SysUtils

function WrapText(const Line, BreakStr: string; nBreakChars: TSysCharSet; MaxCol: Integer):
string; overload;

function WrapText(const Line, MaxCol: Integer = 45):string; overload;

For example, the following call wraps the text into two lines at the last space character:

WrapText("The rain in Spain falls mainly on the plain.", #13#10, ["."," ",#9,"-"], 42);
\rThe result:

The rain in Spain falls mainly on the
plain.

Как осуществить перенос текста в RichEdit (KOL) Найти похожие ветки