Browse Source

* Remove some debug statements

michael 7 years ago
parent
commit
eb11d23de7
1 changed files with 4 additions and 4 deletions
  1. 4 4
      packages/fcl-db/db.pas

+ 4 - 4
packages/fcl-db/db.pas

@@ -4335,14 +4335,14 @@ begin
   DoBeforeScroll;
   ClearBuffers;
   try
-    Writeln('FActiveRecord before last',FActiveRecord);
+    // Writeln('FActiveRecord before last',FActiveRecord);
     InternalLast;
-    Writeln('FActiveRecord after last',FActiveRecord);
+    // Writeln('FActiveRecord after last',FActiveRecord);
     GetPriorRecords;
-    Writeln('FRecordCount: ',FRecordCount);
+    // Writeln('FRecordCount: ',FRecordCount);
     if FRecordCount>0 then
       FActiveRecord:=FRecordCount-1;
-    Writeln('FActiveRecord ',FActiveRecord);
+    // Writeln('FActiveRecord ',FActiveRecord);
   finally
     FEOF:=true;
     DataEvent(deDataSetChange, 0);