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