Reinier Olislagers пре 11 година
родитељ
комит
c07875c24c
1 измењених фајлова са 2 додато и 3 уклоњено
  1. 2 3
      querywindow.pas

+ 2 - 3
querywindow.pas

@@ -1497,9 +1497,8 @@ begin
       (ResultControls[i] as TSQLQuery).Close;
       (ResultControls[i] as TSQLQuery).DataSource:= nil;
     end;
-
-      ResultControls[i].Free;
-      ResultControls[i]:= nil;
+    ResultControls[i].Free;
+    ResultControls[i]:= nil;
   end;
 
   SetLength(ResultControls, 0);