Browse Source

* Fix warnings

Michaël Van Canneyt 2 năm trước cách đây
mục cha
commit
7091f49685
1 tập tin đã thay đổi với 1 bổ sung1 xóa
  1. 1 1
      packages/fcl-db/sqldbrestdataset.pp

+ 1 - 1
packages/fcl-db/sqldbrestdataset.pp

@@ -758,7 +758,7 @@ end;
 function TSQLDBRestDataset.DoResolveRecordUpdate(anUpdate: TRecordUpdateDescriptor): Boolean;
 
 Var
-  rIdx,I : Integer;
+  rIdx : Integer;
   Fld : TField;
   rawData : JSValue;
   Data : TJSArray absolute rawData;