forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

finish highlighter preset system, close #59

This commit is contained in:
Basile Burg 2016-06-17 16:57:17 +02:00
parent d2fc677f97
commit 4cba1ff672
2 changed files with 89 additions and 36 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/ce_d2syn.pas
View File

@ -94,6 +94,7 @@ type
property special: TSynHighlighterAttributes read fSpeckAttrib write setSpeckAttrib; property special: TSynHighlighterAttributes read fSpeckAttrib write setSpeckAttrib;
property errors: TSynHighlighterAttributes read fErrorAttrib write setErrorAttrib; property errors: TSynHighlighterAttributes read fErrorAttrib write setErrorAttrib;
property attributes: TSynHighlighterAttributes read fAttriAttrib write setAttriAttrib; property attributes: TSynHighlighterAttributes read fAttriAttrib write setAttriAttrib;
property DefaultFilter stored false;
public public
constructor create(aOwner: TComponent); override; constructor create(aOwner: TComponent); override;
destructor destroy; override; destructor destroy; override;

124
src/ce_d2synpresets.pas
View File

@ -279,52 +279,104 @@ begin
getHl.special.define(clNavy,[fsBold]); getHl.special.define(clNavy,[fsBold]);
getHl.errors.define(clBlack,[],clNone,clRed,slsWaved,sfeBottom,[]); getHl.errors.define(clBlack,[],clNone,clRed,slsWaved,sfeBottom,[]);
getHl.attributes.define(clNavy,[fsBold]); getHl.attributes.define(clNavy,[fsBold]);
//
folding.Background := clNone;
folding.Foreground := clDkGray;
folding.FrameColor := clDkGray;
//
mouseLink.Style := [fsUnderline, fsBold];
mouseLink.StyleMask := [];
mouseLink.Foreground := clNone;
mouseLink.Background := clNone;
//
bracketMatch.Foreground := clRed;
bracketMatch.Background := clNone;
//
identifierMatch.Foreground:= clNone;
identifierMatch.Background:= clSilver;
identifierMatch.BackAlpha:=70;
//
selection.Background:= $CCCCCC;
selection.Foreground:= clNone;
//
currentLine.Background:= $DEDEDE;
currentLine.Foreground:= clNone;
end; end;
with fPresets.addPreset do with fPresets.addPreset do
begin begin
fName :='dark'; fName :='dark';
fBackground := $00404040; getHl.whites.FrameEdges := sfeNone;
getHl.whites.define(clNone); getHl.numbers.Foreground := 16761218;
getHl.numbers.define($F27900,[fsBold]); getHl.numbers.FrameEdges := sfeNone;
getHl.symbols.define(clMaroon); getHl.numbers.Style := [];
getHl.identifiers.define($E1EFF0); getHl.symbols.Foreground := clYellow;
getHl.comments.define($C7C7C7,[fsItalic]); getHl.symbols.FrameEdges := sfeNone;
getHl.strings.define($84D2EC); getHl.identifiers.Foreground := 14807024;
getHl.keywords.define($93C797,[fsBold]); getHl.identifiers.FrameEdges := sfeNone;
getHl.ddoc.define(clTeal); getHl.comments.Foreground := 13092807;
getHl.inlineAsm.define($EC84CB,[fsBold]); getHl.comments.FrameEdges := sfeNone;
getHl.special.define($93C797,[fsBold]); getHl.strings.Foreground := 5157104;
getHl.errors.define($E1EFF0,[],clNone,clRed,slsWaved,sfeBottom,[]); getHl.strings.FrameEdges := sfeNone;
getHl.attributes.define($93C797,[fsBold]); getHl.keywords.Foreground := 9684887;
end; getHl.keywords.FrameEdges := sfeNone;
with fPresets.addPreset do getHl.ddoc.Foreground := 14671730;
begin getHl.ddoc.FrameEdges := sfeNone;
fBackground := clWhite; getHl.inlineAsm.Foreground := 15500491;
fName :='Mars bright'; getHl.inlineAsm.FrameEdges := sfeNone;
end; getHl.special.Foreground := 9684887;
with fPresets.addPreset do getHl.special.FrameEdges := sfeNone;
begin getHl.errors.Foreground := 14807024;
fBackground :=clWhite; getHl.attributes.Foreground := 9684887;
fName :='Mars dark'; getHl.attributes.FrameEdges := sfeNone;
background := 4210752;
bracketMatch.Background := clNone;
bracketMatch.Foreground := clFuchsia;
currentLine.Background := 6184542;
currentLine.Foreground := clNone;
folding.Background := 7303023;
folding.Foreground := clYellow;
identifierMatch.Background := 7697781;
identifierMatch.Foreground := clNone;
selection.Background := 10132122;
selection.Foreground := clNone;
end; end;
with fPresets.addPreset do with fPresets.addPreset do
begin begin
fName :='Mustard'; fName :='Mustard';
fBackground := $78C8D3; getHl.whites.FrameEdges := sfeNone;
getHl.whites.define(clNone); getHl.numbers.FrameEdges := sfeNone;
getHl.numbers.define($000079F2,[fsBold]); getHl.symbols.Foreground := 3487083;
getHl.symbols.define(clMaroon); getHl.symbols.FrameEdges := sfeNone;
getHl.identifiers.define($1E2331); getHl.identifiers.Foreground := 1975089;
getHl.comments.define($4F7184,[fsItalic]); getHl.identifiers.FrameEdges := sfeNone;
getHl.strings.define($6D82BA); getHl.comments.Foreground := 5206404;
getHl.keywords.define($313A5A,[fsBold]); getHl.comments.FrameEdges := sfeNone;
getHl.ddoc.define($5F8194); getHl.strings.Foreground := 6056852;
getHl.inlineAsm.define($98B7B4,[fsBold]); getHl.strings.FrameEdges := sfeNone;
getHl.special.define($313A5A,[fsBold]); getHl.keywords.Foreground := 3226202;
getHl.errors.define($1E2331,[],clNone,clRed,slsWaved,sfeBottom,[]); getHl.keywords.FrameEdges := sfeNone;
getHl.attributes.define($313A5A,[fsBold]); getHl.ddoc.Foreground := 6259092;
getHl.ddoc.FrameEdges := sfeNone;
getHl.inlineAsm.Foreground := 3379344;
getHl.inlineAsm.FrameEdges := sfeNone;
getHl.special.Foreground := 3226202;
getHl.special.FrameEdges := sfeNone;
getHl.errors.Foreground := 1975089;
getHl.attributes.Foreground := 3226202;
getHl.attributes.FrameEdges := sfeNone;
background := 9818842;
currentLine.Background := 9030871;
currentLine.Foreground := clNone;
folding.Background := clNone;
folding.Foreground := clYellow;
folding.FrameColor := clYellow;
identifierMatch.Background := 10278890;
identifierMatch.Foreground := clNone;
selection.Background := 8448232;
selection.Foreground := clNone;
end; end;
end; end;
// TODO-cd2synpresets: add more presets
// //
fEditor := TSynEdit.Create(self); fEditor := TSynEdit.Create(self);
fEditor.Parent:= self; fEditor.Parent:= self;