RichEdit1 и несколько вопрсов - Общие вопросы Delphi

Polotenchik · 04.12.2008, 14:36

Добрый день!
1. Подскажите можно ли решить проблему с ограничением текста 255?
Естественно можно сделать так:

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
RichEdit1.Text:='длинный текст'+'продолжение текста';
end;

но хотелось бы сразу вставлять весь текст.

2. Местами мне надо, чтобы текст переходил на новую строку (т.е как по нажатию на ентер). Вроде есть некий код для этого, напомните пожалуйста?!

3. Так же местами необходимо изменить шрифт (размер и цвет). т.е так:

Код:

RichEdit1.Text:='длинный текст'+'продолжение текста';

'продолжение текста' - должно быть шрифтом с размером 14 и красным цветом.

как это сделать?

Заранее спасибо!

Dr.Badnezz · 04.12.2008, 15:51

По поводу второго пункта. Вроде так можно сделать:
Richedit1.text := 'Первая строка' + #13 + 'вторая строка';

Квэнди · 04.12.2008, 16:01

один вопрос - одна тема.
закрыто.

04.12.2008, 15:51	#2
Dr.Badnezz Ученик Форумчанин Регистрация: 19.09.2008 Сообщений: 119	По поводу второго пункта. Вроде так можно сделать: Richedit1.text := 'Первая строка' + #13 + 'вторая строка'; itparser.ru

04.12.2008, 16:01	#3
Квэнди Старожил Регистрация: 13.12.2006 Сообщений: 3,859	один вопрос - одна тема. закрыто. ICQ не для вопросов, а для предложений. Для вопросов используйте форум IRC канал клуба программистов\|Мои статьи

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
RichEdit1 если текст найден надо чтоб он выделился в синий цвет	xGroupers	Общие вопросы Delphi	7	30.03.2008 13:56
Несколько клавиш	snake-as	Общие вопросы Delphi	3	15.03.2008 10:23
Опять RichEdit1	Римма	Компоненты Delphi	0	24.01.2008 10:55
Помогите прописать PageSetupDialog1 для RichEdit1	kuzmich	Общие вопросы Delphi	4	08.05.2007 09:23

04.12.2008, 14:36	#1
Polotenchik Форумчанин Регистрация: 04.12.2008 Сообщений: 260	RichEdit1 и несколько вопрсов Добрый день! 1. Подскажите можно ли решить проблему с ограничением текста 255? Естественно можно сделать так: Код: `procedure TForm1.Button1Click(Sender: TObject); begin RichEdit1.Text:='длинный текст'+'продолжение текста'; end;` но хотелось бы сразу вставлять весь текст. 2. Местами мне надо, чтобы текст переходил на новую строку (т.е как по нажатию на ентер). Вроде есть некий код для этого, напомните пожалуйста?! 3. Так же местами необходимо изменить шрифт (размер и цвет). т.е так: Код: `RichEdit1.Text:='длинный текст'+'продолжение текста'; 'продолжение текста' - должно быть шрифтом с размером 14 и красным цветом.` как это сделать? Заранее спасибо! Я бы изменил мир, но Бог не дает исходники...