anchor.diff:    Result := FKeys;
   end;
   
  +{$IFDEF INTERNAL_USE_FOLDERHELPER_UNIT}
   class procedure TWallet.Load;
   begin
     try
  
positive.code:     end;
    end;
  end;
  
  class function TWallet.HasKey(const AKey: TWalletKey) : boolean;
  begin
  
negative.code: 
  function TWalletKeys.AddPrivateKey(Const Name : String; ECPrivateKey: TECPrivateKey): Integer;
  Var P : PWalletKey;
    raw_priv2hexa : TRawBytes;
  begin
    if Not Find(ECPrivateKey.PublicKey,Result) then begin
  