anchor.diff:  
   {$MODE DELPHI}
   
  +{$modeswitch nestedprocvars}
  +
   {.$DEFINE VISUALGRID_DEBUG}
   
   interface
   
   uses
     Classes, SysUtils, StdCtrls, ExtCtrls, Controls, Grids, Types, Graphics,
  -  UCommon, UCommon.Data, UCommon.Collections, Generics.Collections, Generics.Defaults, Menus, ComboEx, Buttons, Math,
  +  UCommon, UCommon.Data, UAccounts, UWallet, UCommon.Collections, Generics.Collections, Generics.Defaults, Menus, ComboEx, Buttons, Math,
     LResources, syncobjs;
   
   const
  
positive.code:     function GetSelectedRows : TArray<Variant>;
      procedure ControlsEnable(AEnable: boolean);
      function GetCanvas: TCanvas;
      procedure SetCells(ACol, ARow: Integer; AValue: Variant);
      procedure SetFetchDataInThread(AValue: boolean);
      procedure SetSortMode(AValue: TSortMode);
  
negative.code: 
  implementation
  
  uses Variants, UAutoScope, Dialogs, UUserInterface;
  
  resourcestring
    sTotal = 'Total: %d';
  