SynEdit and syntax HighLighting

[TonnyB]

Hello there. I use TSynEdit and TSynPasSyn.Who can help, how change color of this red frame ?

[Martin_fr]

It is TSynEditMarkupWordGroup

You can access it via

TSynEditMarkupWordGroup(SynEdit.MarkupByClass[TSynEditMarkupWordGroup]).MarkupInfo.xxx

xxx can be
    property Background stored GetBackgroundColorStored;
    property Foreground stored GetForegroundColorStored;
    property FrameColor stored GetFrameColorStored;
    property FrameStyle stored GetFrameStyleStored;
    property FrameEdges stored GetFrameEdgesStored;
    property Style stored GetFontStyleStored;
    // TODO: StyleMask move to TSynHighlighterAttributesModifier
    property StyleMask stored GetFontStyleMaskStored;
    // FStyle = [],       FStyleMask = []        ==> no modification
    // FStyle = [fsBold], FStyleMask = []        ==> invert fsBold
    // FStyle = [],       FStyleMask = [fsBold]  ==> clear  fsBold
    // FStyle = [fsBold], FStyleMask = [fsBold]  ==> set    fsBold
    property BackPriority: integer read FBackPriority write SetBackPriority stored GetBackPriorityStored;
    property ForePriority: integer read FForePriority write SetForePriority stored GetForePriorityStored;
    property FramePriority: integer read FFramePriority write SetFramePriority stored GetFramePriorityStored;
    property BoldPriority: integer index fsBold read GetStylePriority write SetStylePriority stored GetStylePriorityStored;
    property ItalicPriority: integer index fsItalic read GetStylePriority write SetStylePriority  stored GetStylePriorityStored;
    property UnderlinePriority: integer index fsUnderline read GetStylePriority write SetStylePriority  stored GetStylePriorityStored;
    property StrikeOutPriority: integer index fsStrikeOut read GetStylePriority write SetStylePriority  stored GetStylePriorityStored;
    // Alpha = 0 means solid // 1..255 means n of 256
    property BackAlpha: byte read FBackAlpha write SetBackAlpha stored GetBackAlphaStored;
    property ForeAlpha: byte read FForeAlpha write SetForeAlpha stored GetForeAlphaStored;
    property FrameAlpha: byte read FFrameAlpha write SetFrameAlpha stored GetFrameAlphaStored;

[TonnyB]

Oh ... It's amazing. Thanks.
There is a last one small question.  Can u help me with theory, how do HighLighting for other constuction like 'for' or 'while' like this ?

[Martin_fr]

Look at FoldConfig

For i := 0 to PasHighlighter.FoldConfigCount-1 do
  PasHighlighter.FoldConfig.xxx

or
  PasHighlighter.FoldConfig[ord(cfbtWhileDo)].xxx


Enabled := true
Modes := Modes + [fmMarkup]

Not sure which pairs support this.
You can also set/remove fmFold / fmHide in Modes

Hide is like fold, but includes hiding the first line (good for comments).