@Silvio
I've created a brand new project that uses TBrookDBAction instead of TBrookAction, but I still get the same error. Here is the broker:
unit brokers007;
{$mode objfpc}{$H+}
interface
uses
BrookFCLCGIBroker, BrookUtils, BrookSQLdbBroker, PQConnection;
implementation
initialization
BrookSettings.Charset := 'library=sqldb;driver=postgresql;host=127.0.0.1;user=USERNAME;password=PASSWORD;database=TESTDB';
BrookSettings.Page404 := '404.html';
BrookSettings.Page500 := '500.html';
end.
..and here is the action:
unit umain007;
{$mode objfpc}{$H+}
interface
uses
BrookDBAction, fpJSON;
type
TMyAction = class(TBrookDBAction)
public
procedure Get; override;
end;
implementation
{ TMyAction }
procedure TMyAction.Get;
begin
Write(Table.Open.AsJSON);
end;
initialization
TMyAction.Register('gateway','*');
end.
See the attachment for the response.
JamHitz