paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-02 17:50:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Added support for JSON fields, patch from Silvio Clecio (Bug ID 27606)

Browse Source 
git-svn-id: trunk@30121 -
This commit is contained in:
michael 2015-03-07 15:42:13 +00:00
parent 68a2e3cd74
commit f2b2310856
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/fcl-db/src/sqldb/postgres/pqconnection.pp
View File

@ -176,6 +176,7 @@ const Oid_Bool = 16;
Oid_Int8 = 20;
Oid_int2 = 21;
Oid_Int4 = 23;
Oid_JSON = 114;
Oid_Float4 = 700;
Oid_Money = 790;
Oid_Float8 = 701;
@ -751,7 +752,7 @@ begin
if size > MaxSmallint then size := MaxSmallint;
end;
// Oid_text : Result := ftstring;
Oid_text : Result := ftMemo;
Oid_text,Oid_JSON : Result := ftMemo;
Oid_Bytea : Result := ftBlob;
Oid_oid : Result := ftInteger;
Oid_int8 : Result := ftLargeInt;