Introduce a UNKNOWN data type in PostgreSQL, so we don't fall into a SQL error when opening the data grid with a SUBSTR() call on a non-text column, for example USER-DEFINED/GEOMETRY(POINT).

This commit is contained in:
Ansgar Becker
2014-08-31 09:25:38 +00:00
parent d1b0c27d51
commit ea4701f73f
2 changed files with 14 additions and 3 deletions

View File

@@ -1444,7 +1444,7 @@ begin
end;
rx.Free;
if (not Match) and (FParameters.NetTypeGroup = ngPgSQL) then
Result := FDatatypes[11];
Result := FDatatypes[0];
end;

View File

@@ -186,7 +186,7 @@ type
dtDate, dtTime, dtYear, dtDatetime, dtSmalldatetime, dtTimestamp,
dtChar, dtNchar, dtVarchar, dtNvarchar, dtTinytext, dtText, dtNtext, dtMediumtext, dtLongtext,
dtBinary, dtVarbinary, dtTinyblob, dtBlob, dtMediumblob, dtLongblob, dtImage,
dtEnum, dtSet, dtBit, dtVarBit, dtBool,
dtEnum, dtSet, dtBit, dtVarBit, dtBool, dtUnknown,
dtCursor, dtSqlvariant, dtTable, dtUniqueidentifier,
dtPoint, dtLinestring, dtLineSegment, dtPolygon, dtGeometry, dtBox, dtPath, dtCircle, dtMultipoint, dtMultilinestring, dtMultipolygon, dtGeometrycollection
);
@@ -1121,8 +1121,19 @@ var
)
);
PostgreSQLDatatypes: Array[0..26] of TDBDatatype =
PostgreSQLDatatypes: Array[0..27] of TDBDatatype =
(
(
Index: dtUnknown;
NativeTypes: '99999';
Name: 'UNKNOWN';
Description: 'Unknown data type';
HasLength: False;
RequiresLength: False;
HasBinary: False;
HasDefault: False;
Category: dtcOther;
),
(
Index: dtSmallint;
NativeTypes: '21';