anchor.diff:    inherited Destroy;
   end;
   
  -function TGetMailPop3.CheckMail(out aErrorMessage: String): boolean;
  +function TGetMailPop3.CheckMail(out aErrorMessage: String; const aProcessMessage: TProcessMailMessage): boolean;
   var
     tmpPop3 : TIdPOP3;
     error : boolean;
     i, numMessages : integer;
     msg : TIdMessage;
  +  doDelete : boolean;
  +  curMailMessage : TReceivedMail;
     {$IFDEF OUTLOOK_OAUTH2_AVAILABLE}
     xoauthSASL : TIdSASLListEntry;
     {$ENDIF}
  
positive.code:     property ReceivedDate : TDateTime read FReceivedDate write FReceivedDate;
      property Sender : String read FSender write FSender;
    end;
  
    { TGetMailPop3 }
  
  
negative.code:     constructor Create;
      destructor Destroy; override;
  
      function CheckMail(out aErrorMessage: String; const aProcessMessage: TProcessMailMessage) : boolean;
      function MailsCount : integer;
      function GetMail (const aIndex : integer): TReceivedMail;
  
  