[Oleg]

1)Например, имеется текст, а в нем есть свои теги, типа разметки.
Например тег [centerS]text[/centerS] но без "S", а то на форуме текст ставится по центру . И что заключено в этот тег, то будет в отображении по центру.
Как можно сделать редактор такого текста на Delphi, чтобы не было видно этих тегов, но текст был именно по центру(например в Memo), а сохранялся он с тегом, но при загрузке его не было видно, только форматированный текст(т.е. этот текст по центру).
2)Например, имеется текст, а в нем есть свои теги, типа цвета.
Например тег [red]text[/red]. И что заключено в этот тег, то будет красным цветом. Как можно сделать редактор такого текста на Delphi, чтобы не было видно этих тегов, но текст был именно определенного цвета(например в Memo), а сохранялся он с тегом, но при загрузке его не было видно, только форматированный текст(т.е. этот текст цветной).
Подскажите как это реализовать, а то я никогда не таких примеров и не знаю с чего начать .
Подскажите пожалуйста, эксперты.

[Winny]

Можно сделать проще. Создаёшь RichEdit и WebBrowser. На событие OnChange у RichEdit пиши:

Код:

RichEdit1.Lines.SaveToFile('save.html');
WebBrowser1.Navigate('save.html');

[Oleg]

Сообщение от Winny

Можно сделать проще. Создаёшь RichEdit и WebBrowser. На событие OnChange у RichEdit пиши:

Код:

RichEdit1.Lines.SaveToFile('save.html');
WebBrowser1.Navigate('save.html');

Нет, мне нужно именно так, как сказано выше т.к. я работаю с XML форматом. Или всё-таки можно так ? Можно пример ?
Но всё-таки нужно как сказано выше ...

[Rosenkrantz]

Используйте RichEdit.

Отцентрировать текст:

Код:

ARichEdit.Paragraph.Alignment := taCenter;

Раскрасить текст:

Код:

ARichEditSelAttributes.Color := clRed;

Изменить шрифт:

Код:

ARichEdit.SelAttributes.Name  := 'Arial';

Paragraf здесь - либо выделенный кусок текста, либо абзац, на котором установлен курсор. Курсор позиционируется через SelStart.

SelAttributes - аттрибуты выделенного куска текста: цвет, фонт.

Чтобы выделить текст, например, с 1 по 10-й символ:

Код:

ARichEdit.SelStart := 0;
ARichEdit.SelLength := 10;

Естественно, придется самому заботиться о том, чтобы текст RichEdit форматировался в зависимости от тэгов. Ну и при сохранении в соответствии с форматированием обрамлять текст нужными тэгами тоже - самостоятельно.

[Oleg]

Компонент называется TDBReichEdit ? так. Если да, то почему ничего нельзя написать и если в него загрузить текст, то при первом нажатии он исчезает ??
Извините, всё нашел буду пробовать...

[Rokuell]

Компонент называется RichEdit вкладка Win32

[Winny]

TDBRichEdit - это к базам данных отностится, не то, что тебе нужно.

[Rosenkrantz]

Сообщение от Oleg

А как применить например цвет к одному слову в ReichEdit ? Выбрав его:

Сообщение от Rosenkrantz

Чтобы выделить текст, например, с 1 по 10-й символ:

Код:

ARichEdit.SelStart := 0;
ARichEdit.SelLength := 10;

Установите SelStart и SelLength и текст будет выделен.

[Oleg]

Сообщение от Rosenkrantz

Установите SelStart и SelLength и текст будет выделен.

Что-то не совсем понятно, можно примерный код, если я выделил в ReichEdit текст и нажал такую-то кнопку => текст цветной+(оформлен тегом, например [red]text[/red]). (Я просто наверное не правильно задал вопрос)