Browse Source

* Support OldValue

michael 7 years ago
parent
commit
5113c4f198
1 changed files with 12 additions and 2 deletions
  1. 12 2
      packages/fcl-db/jsondataset.pas

+ 12 - 2
packages/fcl-db/jsondataset.pas

@@ -777,9 +777,19 @@ var
 
 
 begin
 begin
   if (FEditIdx=Buffer.Bookmark) then
   if (FEditIdx=Buffer.Bookmark) then
-    R:=FEditRow
+    begin
+    if State=dsOldValue then
+      R:=Buffer.data
+    else
+      R:=FEditRow
+    end
   else
   else
-    R:=Buffer.data;
+    begin
+    if State=dsOldValue then
+      Exit(Null)
+    else
+      R:=Buffer.data;
+    end;
   Result:=FFieldMapper.GetJSONDataForField(Field,R);
   Result:=FFieldMapper.GetJSONDataForField(Field,R);
 end;
 end;