Permalink
Browse files

Add "Material" color preset for SQL editors. See #425 (comment)

  • Loading branch information...
ansgarbecker committed Jan 1, 2019
1 parent dd22108 commit 5a5d55fafa3d3f7468ed5c9376c9888ebc08df8d
Showing with 22 additions and 2 deletions.
  1. +21 −1 source/options.dfm
  2. +1 −1 source/options.pas
@@ -388,7 +388,7 @@ object optionsform: Toptionsform
Width = 53
Height = 21
TabOrder = 2
Text = '2.000'
Text = '2000'
OnChange = Modified
end
object chkLogToFile: TCheckBox
@@ -1400,4 +1400,24 @@ object optionsform: Toptionsform
Left = 284
Top = 404
end
object SynSQLSyn_Material: TSynSQLSyn
Options.AutoDetectEnabled = False
Options.AutoDetectLineLimit = 0
Options.Visible = False
CommentAttri.Foreground = 5533306
ConditionalCommentAttri.Foreground = 7193272
DataTypeAttri.Foreground = 13079274
DelimitedIdentifierAttri.Foreground = 8565247
FunctionAttri.Foreground = 12832483
IdentifierAttri.Foreground = 8565247
KeyAttri.Foreground = 12832483
NumberAttri.Foreground = 16733040
StringAttri.Foreground = 12839047
SymbolAttri.Foreground = 8440772
TableNameAttri.Foreground = 16217705
VariableAttri.Foreground = 16763755
SQLDialect = sqlMySQL
Left = 320
Top = 404
end
end
@@ -928,7 +928,7 @@ procedure Toptionsform.comboThemeSelect(Sender: TObject);
if ThemeIsDark(comboTheme.Text) then begin
comboGridTextColorsPreset.ItemIndex := comboGridTextColorsPreset.Items.IndexOf(_('Dark'));
comboGridTextColorsPresetSelect(comboGridTextColorsPreset);
comboEditorColorsPreset.ItemIndex := comboEditorColorsPreset.Items.IndexOf(_('Dark'));
comboEditorColorsPreset.ItemIndex := comboEditorColorsPreset.Items.IndexOf(_('Material'));
comboEditorColorsPresetChange(comboEditorColorsPreset);
end else begin
comboGridTextColorsPreset.ItemIndex := comboGridTextColorsPreset.Items.IndexOf(_('Light'));

0 comments on commit 5a5d55f

Please sign in to comment.