anchor.diff:        FCachedDataTable := nil;
         FFetchDataThreadTimer.Enabled:=false;
         FLoadDataPanel.Visible:=False;
  -      SetAllEditsAsReadOny(false);
  +      ControlsEnable(true);
       end;
   
       FPageCount:=FetchResult.PageCount;
  
positive.code:   LCellData: Variant;
  begin
    LHandled := False;
    if ARow = 0 then
      ResizeSearchEdit(ACol);
    if (ARow > 0) and Assigned(FDataSource) then
  
negative.code:     PROGRESS := 0;
  end;
  
  procedure TCustomVisualGrid.ControlsEnable(AEnable: boolean);
  var
    e: TSearchEdit;
    LReadOnly: boolean;
  begin
    LReadOnly:=not AEnable;
    FMultiSearchCheckComboBox.Enabled:=AEnable;
    FSearchEdit.ReadOnly:=LReadOnly;
    FPageSizeEdit.ReadOnly:=LReadOnly;
    FPageIndexEdit.ReadOnly:=LReadOnly;
    FDrawGrid.Enabled:=AEnable;
    for e in FMultiSearchEdits do
      e.FEdit.ReadOnly:=LReadOnly;
  end;
  
  function TCustomVisualGrid.GetCells(ACol, ARow: Integer): Variant;
  