Einzelnen Beitrag anzeigen

HPB

Registriert seit: 2. Jun 2008
365 Beiträge
 
Delphi XE7 Professional
 
#18

AW: Am Mailserver GMX anmelden

  Alt 18. Sep 2015, 10:03
Kommt der Fehler "Sender Adress is not allowed" beim IdSMTP1.Connect; oder später beim Senden der Mail?
Guten Tag Sir Rufo,
die Fehlermeldung kommt später beim Senden.

Delphi-Quellcode:
  if not MeldeAmServerAn then
  begin
    Application.MessageBox('Es konnte keine Verbindung zum' + #13#10 +
      'Mailserver aufgebaut werden!', 'BPS . . .', MB_OK +
      MB_ICONSTOP);
    Exit;
  end;

  pBody := TStringList.Create;
  pBody.Clear;
  pBody.Append('Sehr geehrte Damen und Herren,'
     + sLineBreak
     + 'dies ist eine Testmail vom Konto'
     + sLineBreak
     + 'an Konto ' + edtSendeTestMail.Text
     + sLineBreak + sLineBreak
     + 'Mit freundlichem Gruß');

   idmsgSendeMessage.Recipients.EMailAddresses := edtSendeTestMail.Text;
   idmsgSendeMessage.Subject := 'Test E-Mail';
   idmsgSendeMessage.Body := pBody;

  idsmtp1.Connect;
  idsmtp1.Send(idmsgSendeMessage); // hier kommt nun die Fehlermeldung
  idsmtp1.Disconnect;
Aber warum gerade dort?
Mit Gruß
HPB
  Mit Zitat antworten Zitat