From bece59d6694c274608538121cddc4f089bc569e4 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Thu, 21 May 2009 23:13:29 +0000
Subject: [PATCH] Table editor: Better use NULL as a valid default value for a
 new blank INT column, rather than an empty string ('').

---
 source/table_editor.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/source/table_editor.pas b/source/table_editor.pas
index 30cc506b..6e74b978 100644
--- a/source/table_editor.pas
+++ b/source/table_editor.pas
@@ -678,7 +678,7 @@ begin
     Properties.Assign(DefProperties);
   end else begin
     idx := Columns.Count;
-    Properties.CommaText := 'INT,10,'+BoolToStr(False)+','+BoolToStr(True)+',0,,';
+    Properties.CommaText := 'INT,10,'+BoolToStr(False)+','+BoolToStr(True)+','+IntToStr(Integer(cdtNull))+'NULL,,';
   end;
   Columns.InsertObject(idx, 'Column '+IntToStr(idx+1), Properties);
   SelectNode(listColumns, idx);