+ Ответить в теме
Показано с 1 по 2 из 2

Тема: SynEdit подсветка синтаксиса

  1. #1
    dummy BannedUser is on a distinguished road
    Регистрация
    21.01.2017
    Возраст
    27
    Сообщений
    3
    Вес репутации
    0

    По умолчанию SynEdit подсветка синтаксиса

    Всем привет. Решил познакомиться с компонентом SynEdit и поэтому полез в демки, а именно HighlighterDemo.

    В этом демо представлен компонент (TSynCustomHighlighter) с собственной подсветкой слов 'hello', 'synEdit' и 'world':


    Код :
    1.   TSynSampleSyn = class(TSynCustomHighlighter)
    2.   private
    3.     fRange: TRangeState;
    4.     fTokenID: TtkTokenKind;
    5.     fIdentFuncTable: array[0..3] of TIdentFuncTableFunc;
    6.  
    7. ...
    8.  
    9.   KeyWords: array[0..3] of UnicodeString = (
    10.     'hello', 'synedit', 'world', 'highlighter'
    11.   );
    12.  
    13.   KeyIndices: array[0..3] of Integer = (
    14.     0, 2, 1, 3
    15.   );
    16.  
    17. procedure TSynSampleSyn.InitIdent;
    18. var
    19.   i: Integer;
    20. begin
    21.   for i := Low(fIdentFuncTable) to High(fIdentFuncTable) do
    22.     if KeyIndices[i] = -1 then
    23.       fIdentFuncTable[i] := AltFunc;
    24.  
    25.   fIdentFuncTable[0] := FuncHello;
    26.   fIdentFuncTable[2] := FuncWorld;
    27.   fIdentFuncTable[1] := FuncSynedit;
    28.   fIdentFuncTable[3] := FuncHightLight;
    29.  
    30. ...
    31.  
    32. function TSynSampleSyn.FuncHightLight(Index: Integer): TtkTokenKind;
    33. begin
    34.   if IsCurrentToken(KeyWords[Index]) then
    35.     Result := tkKey
    36.   else
    37.     Result := tkIdentifier;
    38. end;

    Но вот заставить, чтобы подсвечивалось ещё и 'highlighter', никак не выходит ...

    Я бы прикрепил бы и саму демку, но что-то видимо пока прав на форуме не хватает ...
    Вложения
    Последний раз редактировалось BannedUser; 22.01.2017 в 00:55.

  2. По умолчанию

     
    Хотите избавиться от рекламы? Зарегистрируйтесь
  3. #2
    dummy BannedUser is on a distinguished road
    Регистрация
    21.01.2017
    Возраст
    27
    Сообщений
    3
    Вес репутации
    0

    По умолчанию Re: SynEdit подсветка синтаксиса

    Прикрепил архив с демо

+ Ответить в теме

Похожие темы

  1. о SynEdit...
    Есть необходимость в подсветке ключевых слов (символов) разными цветами. Использовала несколько SynGeneralSyn (для разделения групп ключевых слов),...
    от Zerkalka в разделе Компоненты в Delphi
  2. Не гаснет подсветка в Fedora на ноуте HP 6735s
    Поставил на ноут Fedora 10, настроил. Поставил драйвера от ATI. При простое системы подсветка монитора не гаснет, экран "серый", через черный экран...
    от Llex в разделе Операционные системы
  3. Знатокам синтаксиса формул Excel VBA. Как написать формулу
    Уважаемые знатоки, есть вопрос: сижу вот маюсь, не получается, аж заело. :confused: (Речь о модуле VBA). Есть ячейка, пусть С3, от нее...
    от VictorM в разделе MS Office и VB(A).
  4. новый мод - подсветка кода
    проверям // a php comment -- a sql comment
    от AiK в разделе Жалобная книга
  5. Подсветка тегов
    Видел программку одну Там есть исходный текст html страницы Все тег подсвечены, а слева от каждой строчки стоит номер строки. Как такое сделать...
    от Лелик в разделе Delphi и Pascal

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения