anchor.diff:      FPort: Integer;
       FUserName: String;
       FPassword: String;
  +    FAcceptOnlyMailFromSpecificDomain : boolean;
  +    FAllowedSenderDomain : String;
       FSSLConnection : boolean;
       FTLSConnection : boolean;
       FReceivedMails : TObjectList;
  
positive.code:           msg := TIdMessage.Create;
            try
              tmpPop3.Retrieve(i, msg);
              ImportMessage(msg, AddReceivedMail);
            finally
              msg.Free;
            end;
  
negative.code:     function SetPassword(const aPassword: String): TGetMailPop3;
      function SetSSLConnection : TGetMailPop3;
      function SetTLSConnection : TGetMailPop3;
      function SetAcceptOnlyMailFromSpecificDomain : TGetMailPop3;
      function SetAllowedSenderDomain(const aAllowedSenderDomain: String): TGetMailPop3;
    end;
  
  implementation
  