FiredDAC Postgres Feldtyp JSON

[himitsu]

Delphi-Quellcode:

    Params.ParamByName('data').DataType := ftString;
    FDConnection1.ExecSQL('INSERT INTO events (guid, type, data, inserted, processed)'
      + ' VALUES (:guid, :type, :data::JSON, :inserted, :processed)', Params);

so?