Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Artpro
0 / 0 / 1
Регистрация: 12.09.2011
Сообщений: 14
#1

Преобразование форматированного текста в ббкод - Delphi

20.10.2012, 09:37. Просмотров 576. Ответов 2
Метки нет (Все метки)

На форме находятся два компонента RichEdit и Memo. Задумка такая, например в RichEdit есть форматированный текст например:

Выделенным жирным шрифтом

а нужно преобразовать в такой вид, с добавлением ббкода:
Код
Выделенным [B]жирным шрифтом[/B]
и вывести в Memo. Как вот такое реализовать?
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
20.10.2012, 09:37
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Преобразование форматированного текста в ббкод (Delphi):

RichEdit и получение от него форматированного текста
Всем привет. Необходимо получить от RichEdit'a текст с форматированием. В сам...

Преобразование текста
Есть такой код: var st1, st : string; i : Integer; begin st := '123';...

Преобразование текста
Есть такой текстовик: "abcX!YZ{{1 нужно преобразовать весть текст в такой...

Преобразование строки и текста.
1.Дана строка(Любое предложение). Зашифровать её, изменив код каждого символа...

Вывод форматированного текста
Есть текст (в ворде) отформатированный по госту (отступы, выравнивание, курсив...

Хранение форматированного текста
Не подскажите каким образом вставлять в бд текст, обращая внимание на отступы и...

2
droider
Universal
Эксперт Pascal/Delphi
4384 / 2432 / 762
Регистрация: 04.10.2012
Сообщений: 8,847
20.10.2012, 13:41 #2
Лучший ответ Сообщение было отмечено Artpro как решение

Решение

Что-то вроде этого... Не полностью конечно, но как вариант (здесь сначала нужно выделить жирный текст)

Delphi
1
2
3
4
5
6
7
8
9
10
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
.........
..........
if RichEdit1.SelAttributes.Style=[fsbold] then
Memo1.Lines.Add('[b]'+RichEdit1.SelText+'[/b]');
...........
...........
end;
end.
P.S. Сейчас нет Delphi под рукой. Извините.
1
Artpro
0 / 0 / 1
Регистрация: 12.09.2011
Сообщений: 14
20.10.2012, 17:11  [ТС] #3
Цитата Сообщение от droider Посмотреть сообщение
Что-то вроде этого... Не полностью конечно, но как вариант (здесь сначала нужно выделить жирный текст)

Delphi
1
2
3
4
5
6
7
8
9
10
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
.........
..........
if RichEdit1.SelAttributes.Style=[fsbold] then
Memo1.Lines.Add('[b]'+RichEdit1.SelText+'[/b]');
...........
...........
end;
end.
P.S. Сейчас нет Delphi под рукой. Извините.
Так я и сам пробовал, но мне как бы нужно чтоб он анализировал текст и вставлял нужный ббкод в нужное место в тексте.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
20.10.2012, 17:11
Привет! Вот еще темы с решениями:

Вывод форматированного текста на форме
Доброго времени суток. Есть вордовский файл (текст + картинки, таблицы могут...

Вывод форматированного текста в MFC
Добрый вечер. Есть небольшая програмка в окне которой нужно вывести текст....

Чтение форматированного текста из файла
Добрый день! Вопросы: 1) Как разархивировать файл? Например, rar или zip....

RichTextbox открытие форматированного текста
Приветствую всех.Возникло два вопроса: как заставить richtextbox отображать...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru