anchor.diff:    Result := not error;
   end;
   
  +initialization
  +  logger := logManager.AddLog('mSendMail');
  +
   end.
  
positive.code:     htmlMessageBuilder.HtmlCharSet:= 'utf-8';
      tmpMessage.From.Name:= FSenderName;
      tmpMessage.From.Address:= FSenderMailAddress;
      tmpMessage.Recipients.EMailAddresses:= FRecipients;
      if FCCRecipients <> '' then
        tmpMessage.CCList.EMailAddresses:= FCCRecipients;
      if FBCCRecipients <> '' then
        tmpMessage.BccList.EMailAddresses:= FBCCRecipients;
      tmpMessage.Subject:= FSubject;
  
      if FHTML.Count > 0 then
        htmlMessageBuilder.Html.AddStrings(FHTML);
  
negative.code:     Data : TStream;
    end;
  
  var
    logger : TmLog;
  
  { TSendMail }
  
  