anchor.diff:        FCachedDataTable := nil;
         FFetchDataThreadTimer.Enabled:=false;
         FLoadDataPanel.Visible:=False;
  -      SetAllEditsAsReadOny(false);
  +      ControlsEnable(true);
       end;
   
       FPageCount:=FetchResult.PageCount;
  
positive.code:   ARefreshColumns: boolean);
  begin
    FGrid := AGrid;
    FGrid.SetAllEditsAsReadOny(true);
    FGrid.FFetchDataThreadTimer.Enabled:=true;
    FGrid.FLoadDataPanel.Visible:=True;
    FGrid.FLoadDataPanel.BringToFront;
  
negative.code:     function GetRows(ARow: Integer): Variant;
      function GetSelection: TVisualGridSelection;
      function GetCaptionVisible: boolean;
      procedure ControlsEnable(AEnable: boolean);
      function GetCanvas: TCanvas;
      function GetSingleSearch: boolean;
      procedure SetCaption(AValue: TCaption);
  