Посоветуйте компонент типа TMemo, чтоб можно было выделять текст (например,

сюда приходит слово, номер линии, возвращается каким шрифтом слово рисовать procedure TCoolMemo.SetFont(Font: Tfont; const word: string; LineNumber: integer); var TempLexKind: integer; begin if FLineHighLihgt then begin if LineNumber > High(FLineHighLighter) then Font.Color := Self.Font.Color else Font.Color := FLineHighLighter[LineNumber]; end else begin TempLexKind := GetLexKind(word); if TempLexKind = DEFAULT_VALUE then Font.Color := StyleServices.GetStyleFontColor(sfEditBoxTextNormal) else with FLexemes[TempLexKind] do Font.Color := Color; end; end;

0

12 дней назад

Handatros

Handatros
сюда приходит слово, номер линии, возвращается как...

Стикер

0

12 дней назад

Alexey Gavrilov

Eugene Krasnikov (ᴊɪɴ x)
А конкретнее, Jedi, например?

Ты не поверишь... TJvEditor

0

12 дней назад

Arioch The

можно найти исходники старые VisualIRC и UniRed и передрать оттуда кусками 😊

0

11 дней назад

Alexey Gavrilov

Arioch The
можно найти исходники старые VisualIRC и UniRed и ...

Та контроллов реально как грязи. Я не стал продолжать, потому что в копилке они для старых Delphi большинство.

0

11 дней назад

Eugene Krasnikov (ᴊɪɴ x) Автор вопроса

Alexey Gavrilov
Ты не поверишь... TJvEditor

Он позволяет именно участки выделять, не конкретные слова?

0

11 дней назад

Alexey Gavrilov

Eugene Krasnikov (ᴊɪɴ x)
Он позволяет именно участки выделять, не конкретны...

Судя по описанию обработчика события - да.

0

11 дней назад

Eugene Krasnikov (ᴊɪɴ x) Автор вопроса

Alexey Gavrilov
Ты не поверишь... TJvEditor

Что-то дичь какая-то вообще. Начиная с того, что шрифт всегда моноширинный, даже если устанавливаешь обычный. И заканчивая тем, что Tab не перепрыгивает на другой контрол, и по ходу, это не лечится.

0

11 дней назад

Alexey Gavrilov

Eugene Krasnikov (ᴊɪɴ x)
Что-то дичь какая-то вообще. Начиная с того, что ш...

Стикер

0

11 дней назад