anchor.diff:      property IsDirectory : Boolean
         read FIsDirectory
         write FIsDirectory;
  +    property IsEncrypted : Boolean
  +      read GetIsEncrypted;
     end;
   
   
  
positive.code:   UpdateColumns;
  end;
  { -------------------------------------------------------------------------- }
  procedure TAbCustomListView.DblClick;
  begin
    inherited;
  
negative.code:     function GetListItems: TAbListItems;
      procedure HeaderWndProc(var Msg: TMessage);
        virtual;
      function IsCustomDrawn(Target: TCustomDrawTarget; Stage: TCustomDrawStage): Boolean;
        override;
      procedure Notification(aComponent : TComponent; aOperation : TOperation);
        override;
      procedure SetArchive(aValue : TAbBaseBrowser);
  