From 8929f32d9bfb42385d9fe2ee98e7e35a2b2cf4f8 Mon Sep 17 00:00:00 2001 From: Ansgar Becker Date: Mon, 21 Apr 2025 21:19:11 +0200 Subject: [PATCH] Enable bracket highlighting in SQL editors --- source/main.pas | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/source/main.pas b/source/main.pas index 1de2929b..9778758e 100644 --- a/source/main.pas +++ b/source/main.pas @@ -14,7 +14,7 @@ uses Generics.Defaults, opensslsockets, StdActns, Clipbrd, Types, LCLType, EditBtn, FileUtil, LMessages, jsonconf, dbconnection, dbstructures, dbstructures.mysql, generic_types, apphelpers, extra_controls, createdatabase, - SynEditMarkupSpecialLine, searchreplace, ImgList, IniFiles, LazFileUtils, tabletools; + SynEditMarkupSpecialLine, SynEditMarkupBracket, searchreplace, ImgList, IniFiles, LazFileUtils, tabletools; type @@ -13442,6 +13442,9 @@ begin if Editor <> BaseEditor then begin Editor.Keystrokes := BaseEditor.KeyStrokes; end; + Editor.BracketHighlightStyle := sbhsBoth; + Editor.BracketMatchColor.Foreground := FMatchingBraceForegroundColor; + Editor.BracketMatchColor.Background := FMatchingBraceBackgroundColor; end;