Ver Fonte

* Fix cancel

michael há 7 anos atrás
pai
commit
14e0b3dff7
1 ficheiros alterados com 1 adições e 1 exclusões
  1. 1 1
      packages/fcl-db/jsondataset.pas

+ 1 - 1
packages/fcl-db/jsondataset.pas

@@ -448,7 +448,7 @@ end;
 
 procedure TBaseJSONDataSet.InternalCancel;
 begin
-
+  FEditRow:=Nil;
 end;
 
 procedure TBaseJSONDataSet.InternalLast;