Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:
реклама
Свадьба в спа отеле Horseka Resort в Подмосковье. , Пантерный мухомор - эффект, дозировка.

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

RTF теги и подсветка синтаксиса в RichEdit

Автор: Meander
Дата: 5 июля 2012 года

Синтаксис RTF тегов с одной стороны довольно прост, но сам язык обладает огромным числом управляющих последовательностей, которые полностью, не знает, наверное, никто. Тем не менее, для подсветки синтаксиса достаточно всего нескольких вариантов стилевого оформления текста:

  1. Жирный -Текст;
  2. Курсив -Текст;
  3. Подчеркнутый - Текст;
  4. Перечеркнутый - Текст;
  5. Цвет текста (ограниченный набор цветов) - Текст;
  6. Цвет фона (ограниченный набор цветов) - Текст;

Структура любого RTF документа следующая:

{\rtf <Текст и теги>\par}

Теперь рассмотрим теги форматирования:

Тег

Результат

\bТекст\b0

Текст

\iТекст\i0

Текст

\ulТекст\ul0

Текст

\strikeТекст\strike0

Текст

\cfnТекст\cf0

Текст

\highlightnТекст\highlight0

Текст

\par

Перенос строки

  1. После каждого тега необходим пробел!
  2. Символn- номер в таблице цветов.

Таким образом, если написать код:

RichEdit1->Text = "{\\rtf \\b Жирный\\b0 \\par}";

Результатом будет:

Жирный

Работа с цветом несколько сложнее, так как таблица цветов, которые используются в тексте, должна располагаться в начале RTF документа, а теги ссылаются на элементы таблицы по индексам. Индексы начинаются с 1, так как индес 0 обозначает закрывающий тег.

Пример таблицы:

{\colortbl ;\red255\green0\blue0;\red0\green255\blue0;}

А вот как ей пользоваться:

Код:
RichEdit1->Text = "{\\rtf \
{\\colortbl ;\\red255\\green0\\blue0;\\red0\\green255\\blue0;}\
\\highlight2 Green\\highlight0 \\par \\cf1 Red\\cf0 \\par}"
;
//не забываем ставить двойной \\ слеш! ;)

Получается следующее:

Green

Red

Этого минимального набора сведений достаточно, для того чтобы создать простейший тестовый редактор с подсветкой синтаксиса. Конечно, это громко сказано, на самом деле это будет редактор, подсвечивающий зарезервированные слова, а не синтаксис. Для синтаксиса парсер долго делать!

Приступаем к разработке кода

Первый приходящий на ум алгоритм прост. Берем текст RichEdit ищем все вхождения каждого зарезервированного слова и запоминаем их позиции в массив. Затем посимвольно копируем этот текст в результирующюу переменную. Если дошли до позиции вхождения слова, обрамляем его тегами.

Информацию о стиле текста будем хранить в структуре Style:

Код:
typedefAnsiString Ansi;

structStyle{
Ansi opentags,
     closetags;
Style(bool,bool,bool,bool,int,int);
//булевы флаги управляют стилями
//FиH1, 2, ... &ndash; индексы цвета в таблице
};

Style::Style(boolB,boolI,boolU,boolS,intF,intH){
if(B){ opentags += &ldquo;\\b &rdquo;; closetags.Insert(&ldquo;\\b0 &rdquo;,1);}
if(I){ opentags += &ldquo;\\i &rdquo;; closetags.Insert(&ldquo;\\i0 &rdquo;,1);}
if(U){ opentags += &ldquo;\\ul &rdquo;; closetags.Insert(&ldquo;\\ul0 &rdquo;,1);}
if(S){ opentags += &ldquo;\\strike &rdquo;;
       closetags.Insert(&ldquo;\\strike0 &rdquo;,1);}
if(F > 0){ opentags += (&ldquo;\\cf&rdquo; + Ansi(F) + &ldquo; &rdquo;);
           closetags.Insert(&ldquo;\\cf0 &rdquo;,1);}
if(H > 0){ opentags += (&ldquo;\\highlight&rdquo; + Ansi(H) + &ldquo; &rdquo;);
           closetags.Insert(&ldquo;\\highlight0 &rdquo;,1);}
}

Библиотеку искомых слов составим на основе структур Word:

Код:
#include <vector>

structWords{
int    size;
Ansi   word;
Style *style;
Words(Ansi w,Style *s){word = w;style = s;size = w. Length();}
};
 
typedefstd::vector<Words> Library;
Library *Alexandria;

Теперь, основной класс – HighLighter:

Код:
#include <map>

typedefstd::map<int,Word*> Hash;//ключ==позициявхождения

classHighLighter{
private:
Hash     find;
Library* Lib;
Ansi     ColorTable;
void    Scan(TRichEdit*);//чтобызаполнитьfind
public:
HighLighter(Ansi C, Library* L){ColorTable = C;Lib = L;}
void    HighLight(TRichEdit*);
};

МетодvoidScan(Ansi); ищет в набранном тексте ключевые слова и запоминает их позиции. Причем для поиска применялись два метода: алгоритм Кнутта – Морриса – Пратта и собственный метод RichEdit-а – FindTextA(…). Их производительность отличается раз в 5, метод FindTextA(…) медленнее, впрочем, как и все у этого компонента. Но быстрый алгоритм выделяет все вхождения подстроки безотносительно к наличию или отсутствию резделителей между словами. Поэтому здесь показан более эффектный метод FindTextA(…).

Код:
voidHighLighter::Scan(TRichEdit*){
intlen = r->Text.Length();
find.clear(); TSearchTypes sOpts;
sOpts = TSearchTypes() << stMatchCase << stWholeWord;
for(pos = Lib->begin();pos != Lib->end();++pos){
 intstart = 0, end = len, is;
 while(0 <= (is = r->FindTextA(pos->word,start,end,sOpts))){
    find[is+1] = pos;// пересчитываем переменные поиска
    start += pos->size; end = len - start;
                                                             }
                                               }
}

Ну и наконец, метод расставляющий теги – единственная интерфейсная функция:

Код:
voidHighLighter::HighLight(TRichEdit *r){
Scan(r); Ansi &s = r->Text;
Ansi result = "{\\rtf1 "; result += ColorTable;
ash = find.begin();//
for(inti = 1;i <= s.Length();i++)
{
 if(!ash->first || i < ash->first)
 {if(s[i] == '\n')result += "\\par ";elseresult += s[i]; }
 else
 if(i == ash->first){
  result += ash->second->style->opentags;
 if(s[i] == '\n')result += "\\par ";elseresult += s[i];
 }else
 if((i >  ash->first) &&
    (i < (ash->first + ash->second->size))){
  result += s[i];
 }else
 if(i == (ash->first + ash->second->size)){
  result += ash->second->style->closetags;
 if(s[i] == '\n')result += "\\par ";elseresult += s[i];
  ++ash;
 }
}
result += "\\par }";
//эти блоки предназначены для устранения
//мерцания экрана
r->DoubleBuffered = 1;
int eventMask = (int)::SendMessage(r->Handle,EM_SETEVENTMASK,0,0);
::SendMessage(r->Handle,WM_SETREDRAW,false,0);
CHARRANGE chrgSave;
::SendMessage(r->Handle,EM_EXGETSEL,0,(LPARAM)&chrgSave);
int en = SendMessage(r->Handle,EM_GETFIRSTVISIBLELINE,0,0);
            r->Text = result;//меняем текст в RichEdit
::SendMessage(r->Handle,EM_EXSETSEL,0,(LPARAM)&chrgSave);
int st = SendMessage(r->Handle,EM_GETFIRSTVISIBLELINE,0,0);
if (st != en) SendMessage(r->Handle,EM_LINESCROLL,0,en-st);
::SendMessage(r->Handle, WM_SETREDRAW,true,0);
::InvalidateRect(r->Handle,0,true);
::SendMessage(r->Handle,EM_SETEVENTMASK,0,eventMask);
r->DoubleBuffered = 0;
r->Repaint();  
}

Несколько корявая вставка из API, но эффект есть!

Остальсь, только, в конструкторе формы инициализировать библиотеку, таблицу цветов и готово.

Код:
HighLighter *hlter;
//-----------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
Alexandria= new Library;                //    B I U S F H
Alexandria->push_back(Words("Стиль1",newStyle(1,0,0,0,0,0)));
Alexandria->push_back(Words("Стиль2",newStyle(0,1,0,0,0,0)));
Alexandria->push_back(Words("Стиль3",newStyle(0,0,1,0,0,0)));
Alexandria->push_back(Words("Стиль4",newStyle(0,0,0,1,0,0)));
Alexandria->push_back(Words("Стиль5",newStyle(0,0,0,0,2,0)));
Alexandria->push_back(Words("Стиль6",newStyle(0,0,0,0,0,1)));
Ansi colors = "{\\colortbl ;\\red255\\green0\\blue0;\
\\red0\\green255\\blue0;}"
;
hlter =newHighLighter(colors,Alexandria);
}

При отпускании клавиши вызываем подсветку…

Код:
void __fastcallTForm1::RichEdit1KeyUp(TObject *Sender, WORD
 &Key, TShiftState Shift)
{
hlter->HighLight(RichEdit1);
}

… и наслаждаемся результатом:

Оставить комментарий

Комментарий:
можно использовать BB-коды
Максимальная длина комментария - 4000 символов.
 
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог
Дачные садовые домики https://domdliavas.ru недорого под ключ.