فهرست منبع

* Support OldValue

michael 7 سال پیش
والد
کامیت
5113c4f198
1فایلهای تغییر یافته به همراه12 افزوده شده و 2 حذف شده
  1. 12 2
      packages/fcl-db/jsondataset.pas

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

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