anchor.diff:        function GetAccounts : TArray<Cardinal> ;
         procedure SetAccounts(const AAccounts : TArray<Cardinal>);
       public
  -      constructor Create(AOwner: TComponent);
  -      destructor Destroy;
  +      constructor Create(AOwner: TComponent); override;
  +      destructor Destroy; override;
         property Accounts : TArray<Cardinal> read GetAccounts write SetAccounts;
         procedure FetchAll(const AContainer : TList<TOperationResume>); override;
     end;
  
positive.code:   finally
     safeBox.EndThreadSave;
    end;
  end;
  
  { TOperationsDataSourceBase }
  
negative.code:       property FilterKeys : TArray<TAccountKey> read GetFilterKeys write SetFilterKeys;
        constructor Create(AOwner: TComponent); override;
        destructor Destroy; override;
        procedure FetchAll(const AContainer : TList<TAccount>); override;
    end;
  
    { TMyAccountsDataSource }
  
    TMyAccountsDataSource = class(TAccountsDataSource)
    public
        procedure FetchAll(const AContainer : TList<TAccount>); override;
    end;
  
  