Browse Source

* Made AddToRows protected

Michaël Van Canneyt 1 year ago
parent
commit
38de35d518
1 changed files with 1 additions and 0 deletions
  1. 1 0
      packages/fcl-db/src/json/fpjsondataset.pp

+ 1 - 0
packages/fcl-db/src/json/fpjsondataset.pp

@@ -263,6 +263,7 @@ type
     procedure SetBookmarkFlag(Buffer: TRecordBuffer; Value: TBookmarkFlag); override;
     procedure SetBookmarkData(Buffer: TRecordBuffer; Data: Pointer); override;
     function GetRecordCount: Integer; override;
+    procedure AddToRows(AValue: TJSONArray);
     procedure SetRecNo(Value: Integer); override;
     function GetRecNo: Integer; override;
   Protected