🚀 go-pugleaf

I was wrong.  It is still giving me the assertion error.  the code is below.

Think of "Header" as an INI file

void __fastcall TEmail::SendEmail2(TIniTable& Header) {
  int Count;
  dstring j,err;

  IdSMTP1->Host = Header["Host"];
  IdSMTP1->Port = Header["Port"].as_int();

  if( Header["Encripted"].as_int() ){
    IdSMTP1->IOHandler = IdSSLIOHandlerSocketOpenSSL1;
    IdSSLIOHandlerSocketOpenSSL1->PassThrough = true;
    IdSMTP1->UseTLS = utUseExplicitTLS;
    if( Header["EncriptionMethod"] == "TLSv1" ) {
      IdSSLIOHandlerSocketOpenSSL1->SSLOptions->Method = sslvTLSv1;
    } else if( Header["EncriptionMethod"] == "SSLv2" ) {
      IdSSLIOHandlerSocketOpenSSL1->SSLOptions->Method = sslvSSLv2;
    } else if( Header["EncriptionMethod"] == "SSLv23" ) {
      IdSSLIOHandlerSocketOpenSSL1->SSLOptions->Method = sslvSSLv23;
    } else if( Header["EncriptionMethod"] == "SSLv3" ) {
      IdSSLIOHandlerSocketOpenSSL1->SSLOptions->Method = sslvSSLv3;
    }
  } else {
    IdSMTP1->UseTLS = utNoTLSSupport;
    IdSMTP1->IOHandler = NULL;
  }
  if( Header["Authenticate"].as_int() ) {
    IdSMTP1->AuthType = Idsmtp::atSASL;
    IdUserPassProvider1->Username = Header["UserName"];
    IdUserPassProvider1->Password = Header["Password"];
    IdSMTP1->Username =  Header["UserName"];
    IdSMTP1->Password = Header["Password"];
  } else {
    IdSMTP1->AuthType = Idsmtp::atNone;
  }

  IdMessage1->Clear();
  IdMessage1->From->Address = Header["From"];
  IdMessage1->Recipients->EMailAddresses = AnsiString(Header["To"]);
  IdMessage1->Subject = Header["Subject"];

  Header.SetSection("$");
  if( Header["Attachments"].as_int() ) {
    Header.SetSection("Body");
    Count = Header["NoOfLines"].as_int();

    TIdText *pText = new TIdText(IdMessage1->MessageParts, NULL);
    pText->ContentType = "text/plain";

    for(int i = 1; i <= Count; ++i) {
      pText->Body->Add(Header[dstring(i)]);
    }
    Header.SetSection("AttachmentList");
    Count = Header["NoOfFiles"].as_int();
    for(int i = 1; i <= Count; ++i) {
      new TIdAttachmentFile(IdMessage1->MessageParts,Header[dstring(i)]);
    }
    IdMessage1->ContentType = "multipart/mixed";
  } else {
    Header.SetSection("Body");
    Count = Header["NoOfLines"].as_int();
    for(int i = 1; i <= Count; ++i) {
     IdMessage1->Body->Add(Header[dstring(i)]);
    }
    IdMessage1->ContentType = "text/plain";
  }

  Header.SetSection("$");
  try {
    IdSMTP1->Connect();
    try {
      IdSMTP1->Send(IdMessage1);
    } __finally {
      IdSMTP1->Disconnect(true);
    }
    Header.Set("Result", "1");
  } catch (const Exception& E) {
    if (!UpperCase(E.Message).Pos("RANGE CHECK ERROR")) {
      err = E.Message;
      Header.Set("Error", E.Message);
      Header.Set("Result", "0");
    }
  }
  IdMessage1->Clear();
  if(err != "") throw Exception(AnsiString(err));
}