From 9134c20b4b4e648be43c58655e3625cb606b3c79 Mon Sep 17 00:00:00 2001
From: vincents <vincents@lazarus-ide.org>
Date: Fri, 4 Sep 2009 14:58:26 +0000
Subject: [PATCH] SQL DB component: SQL Editor uses the editor settings for
 font and highlighter (issue #14432)

git-svn-id: trunk@21571 -
---
 components/sqldb/sqlstringspropertyeditordlg.pas | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/components/sqldb/sqlstringspropertyeditordlg.pas b/components/sqldb/sqlstringspropertyeditordlg.pas
index fe3e410851..3e051561ce 100644
--- a/components/sqldb/sqlstringspropertyeditordlg.pas
+++ b/components/sqldb/sqlstringspropertyeditordlg.pas
@@ -6,7 +6,8 @@ interface
 
 uses
   Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
-  SynEdit, ButtonPanel, SynHighlighterSQL, ComCtrls, SQLDb, db, DBGrids;
+  SynEdit, ButtonPanel, SynHighlighterSQL, ComCtrls, SQLDb, db, DBGrids,
+  SrcEditorIntf;
 
 type
 
@@ -60,6 +61,8 @@ resourcestring
 constructor TSQLStringsPropertyEditorDlg.Create(AOwner: TComponent);
 begin
   inherited Create(AOwner);
+  SourceEditorWindow.GetEditorControlSettings(SQLEditor);
+  SourceEditorWindow.GetHighlighterSettings(SQLHighlighter);
   EditorTabSheet.Caption := SSQLTabCaption;
   ResultTabSheet.Caption := SResultTabCaption;
 end;