Fix detection logic in table editor for columns which allow NULL. Fixes issue #1270.

This commit is contained in:
Ansgar Becker
2009-07-27 22:15:57 +00:00
parent c15654aacb
commit be834ab34a

View File

@ -355,6 +355,9 @@ begin
Props[3] := BoolToStr(True); Props[3] := BoolToStr(True);
ColDefaultType := cdtNull; ColDefaultType := cdtNull;
ColDefaultText := 'NULL'; ColDefaultText := 'NULL';
// Sporadically there is a "NULL" found at this position.
if UpperCase(Copy(ColSpec, 1, 4)) = 'NULL' then
Delete(ColSpec, 1, 5);
end; end;
// Default value // Default value