From 5049a0d73d3a9c63bfbff10879b85338ccd0b927 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Wed, 21 May 2014 10:55:46 +0000
Subject: [PATCH] sqldb: fixed compilation

git-svn-id: trunk@45131 -
---
 components/sqldb/registersqldb.pas | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

diff --git a/components/sqldb/registersqldb.pas b/components/sqldb/registersqldb.pas
index b872ae0f5e..03d779a949 100644
--- a/components/sqldb/registersqldb.pas
+++ b/components/sqldb/registersqldb.pas
@@ -111,7 +111,10 @@ uses
   lazideintf,
   srceditorintf,
   ProjectIntf,
-  idemsgintf,
+  IDEMsgIntf,
+  {$IFDEF EnableNewExtTools}
+  IDEExternToolIntf,
+  {$ENDIF}
   CodeCache,
   CodeToolManager;
 
@@ -421,7 +424,11 @@ end;
 
 procedure TSQLSyntaxChecker.ShowMessage(const Msg: String);
 begin
+  {$IFDEF EnableNewExtTools}
+  IDEMessagesWindow.AddCustomMessage(mluImportant,Msg,SourceFileName);
+  {$ELSE}
   IDEMessagesWindow.AddMsg(SourceFileName+' : '+Msg,'',0,Nil);
+  {$ENDIF}
 end;
 
 procedure TSQLSyntaxChecker.ShowMessage(const Fmt: String; Args: array of const);
@@ -470,7 +477,9 @@ Var
   S : TStringStream;
 
 begin
+  {$IFNDEF EnableNewExtTools}
   IDEMessagesWindow.BeginBlock(False);
+  {$ENDIF}
   try
     try
     Handled:=False;
@@ -496,7 +505,9 @@ begin
         ShowException('Error during syntax check',E);
     end;
   finally
+    {$IFNDEF EnableNewExtTools}
     IDEMessagesWindow.EndBlock;
+    {$ENDIF}
   end;
 end;