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

forces HL presets props to be written + activate reload from file

This commit is contained in:
Basile Burg 2016-06-17 17:02:30 +02:00
parent 4cba1ff672
commit a80ea80db1
1 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
src/ce_d2synpresets.pas
View File

@ -45,15 +45,15 @@ type
procedure setD2syn(value: TPersistent); procedure setD2syn(value: TPersistent);
function getHl: TSynD2Syn; function getHl: TSynD2Syn;
published published
property name: string read fName write fName; property name: string read fName write fName stored true;
property highlighter: TPersistent read fd2syn write setD2Syn; property highlighter: TPersistent read fd2syn write setD2Syn stored true;
property background: TColor read fBackground write fBackground default clWhite; property background: TColor read fBackground write fBackground stored true;
property bracketMatch: TSynSelectedColor read fBracketMatchAttribs write setBracketMatchColor; property bracketMatch: TSynSelectedColor read fBracketMatchAttribs write setBracketMatchColor stored true;
property currentLine: TSynSelectedColor read fCurrLineAttribs write setCurrLineAttribs; property currentLine: TSynSelectedColor read fCurrLineAttribs write setCurrLineAttribs stored true;
property folding: TSynSelectedColor read fFoldedColor write setFoldedColor; property folding: TSynSelectedColor read fFoldedColor write setFoldedColor stored true;
property identifierMatch: TSynSelectedColor read fIdentifierMarkup write setIdentifierMarkup; property identifierMatch: TSynSelectedColor read fIdentifierMarkup write setIdentifierMarkup stored true;
property mouseLink: TSynSelectedColor read fMouseLinkAttribs write setMouseLinkColor; property mouseLink: TSynSelectedColor read fMouseLinkAttribs write setMouseLinkColor stored true;
property selection: TSynSelectedColor read fSelAttribs write setSelCol; property selection: TSynSelectedColor read fSelAttribs write setSelCol stored true;
public public
constructor Create(ACollection: TCollection); override; constructor Create(ACollection: TCollection); override;
destructor destroy; override; destructor destroy; override;
@ -259,9 +259,9 @@ begin
fBackup:= TCED2SynPreset.Create(nil); fBackup:= TCED2SynPreset.Create(nil);
fPresets:= TCED2SynPresets.Create(self); fPresets:= TCED2SynPresets.Create(self);
fname := getCoeditDocPath + optfname; fname := getCoeditDocPath + optfname;
//if fname.fileExists then if fname.fileExists then
//fPresets.loadFromFile(fname) fPresets.loadFromFile(fname)
//else else
begin begin
with fPresets.addPreset do with fPresets.addPreset do
begin begin