Validated if DataSet is active before giving First

viniciussanchez · Aug 26, 2019 · b98f536 · b98f536
1 parent 29db65c
commit b98f536
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/core/DataSet.Serialize.JSON.Impl.pas b/src/core/DataSet.Serialize.JSON.Impl.pas
@@ -420,7 +420,8 @@ procedure TJSONSerialize.JSONArrayToDataSet(const AJSONArray: TJSONArray; const
     else
       JSONObjectToDataSet(LJSONValue as TJSONObject, ADataSet, False);
   end;
-  ADataSet.First;
+  if ADataSet.Active then
+    ADataSet.First;
 end;
 
 procedure TJSONSerialize.Merge(const ADataSet: TDataSet);