From 0725da854f72c41b1d80a76ca876cd0fcbb6d450 Mon Sep 17 00:00:00 2001 From: Ansgar Becker Date: Sun, 2 Nov 2014 18:55:32 +0000 Subject: [PATCH] Fix detection of DEFAULT value in CREATE TABLE code of MS SQL tables, which is wrapped in parentheses. See http://www.heidisql.com/forum.php?t=16748 --- source/dbconnection.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/source/dbconnection.pas b/source/dbconnection.pas index 20cf2e20..c24c16e7 100644 --- a/source/dbconnection.pas +++ b/source/dbconnection.pas @@ -4566,7 +4566,7 @@ begin Col.DefaultType := cdtCurTSUpdateTS; end; Delete(ColSpec, 1, rxCol.MatchLen[0]); - end else if (ColSpec[1] = '''') or (Copy(ColSpec, 1, 2) = 'b''') then begin + end else if (ColSpec[1] = '''') or (Copy(ColSpec, 1, 2) = 'b''') or (Copy(ColSpec, 1, 2) = '(''') then begin InLiteral := True; LiteralStart := Pos('''', ColSpec)+1; for i:=LiteralStart to Length(ColSpec) do begin