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