Char-case is not guaranteed to be always upper-case, so use LowerCase like others sqlDB connections.

git-svn-id: trunk@22816 -

packages/fcl-db/src/sqldb/mssql/mssqlconn.pp

@@ -395,7 +395,8 @@ end;
 
 function TMSSQLConnection.StrToStatementType(s: string): TStatementType;
 begin
-  if s = 'EXEC' then
+  s:=LowerCase(s);
+  if s = 'exec' then
     Result:=stExecProcedure
   else
     Result:=inherited StrToStatementType(s);