anchor.diff:  begin
     // https://www.indyproject.org/2008/01/16/new-html-message-builder-class/
     // https://www.indyproject.org/2005/08/17/html-messages/
  +  // https://stackoverflow.com/questions/18541577/using-indy-10-with-exchange-smtp-server
   
     htmlMessageBuilder := TIdMessageBuilderHtml.Create;
     tmpMessage := TIdMessage.Create(nil);
  
positive.code:   FHTMLImages.Free;
    FAttachments.Free;
    FHTML.Free;
    inherited Destroy;
  end;
  
  
negative.code:   FSenderName:= '';
    FSenderMailAddress:= '@noreply';
    FRecipients:= '';
    FCCRecipients:= '';
    FBCCRecipients:= '';
    FSubject:= '';
    FUserName:= '';
    FPassword:= '';
    FHTMLImages:= TObjectList.Create(true);
    FAttachments:= TObjectList.Create(true);
    FHTML:= TStringList.Create;
    FPlainText:= TStringList.Create;
  end;
  
  destructor TSendMail.Destroy;
  