SMTP-Problem, Indy und TLS 1.3 oder ICS

[HappyJoe]

Hallo,

gestern hat strato TLS 1.0 und 1.1 abgeschaltet und jetzt geht unser Mailversand nicht mehr. Bisher hatte ich die Indy10-Routinen (TIdSMTP und TIdSSLIOHandlerSocketOpenSSL) unter Delphi XE benutzt, aber die unterstützen kein TLS 1.3. Deshalb habe ich die ICS-Routinen installiert, habe aber bereits Probleme bei dem Beispiel-Programm
icsv866\Samples\Delphi\MailNewsDemos\OverbyteIcsMa ilSnd1.
Beim strato-Postfach kommt die Meldung "Connecting to SMTP server ..." und er bleibt hängen. Alternativ habe ich auch gmx probiert (was mit den indys noch problemlos funktioniert). Hier komme ich zwar weiter, aber bei der Authentication ist auch hier Schluss. Das Protokoll sieht so aus

Connecting to SMTP server...
220 gmx.net (mrgmx105) Nemesis ESMTP Service ready
< 220 gmx.net (mrgmx105) Nemesis ESMTP Service ready
RequestDone Rq=0 No Error
EHLO i5-2015
> EHLO i5-2015
250-gmx.net Hello i5-2015 [79.212.23.214]
< 250-gmx.net Hello i5-2015 [79.212.23.214]
250-8BITMIME
< 250-8BITMIME
250-SIZE 69920427
< 250-SIZE 69920427
250 STARTTLS
< 250 STARTTLS
RequestDone Rq=10 No Error
AUTH CRAM-MD5
> AUTH CRAM-MD5
530 Must issue a STARTTLS command first
< 530 Must issue a STARTTLS command first
RequestDone Rq=11 Error: 500 Authentication Type could not be determined.
Error, stoped All-In-One demo

Die Authentication ist AutoSelect, aber auch alle anderen Einstellungen gehen nicht.

Hat jemand eine Idee, warum das DemoProg nicht funktioniert oder auch wie ich möglichst schnell wieder versenden kann?

[TurboMagic]

Falls du hier nicht weiterkommen solltest: in der en.delphipraxis.net gibt's ein ICS Unterforum wo die Entwickler mit lesen und antworten. Alternativ gibt's für die Übergangszeit SMTPRelay oder so, das liefe auf dem Mail sendenden PC, gibt sich dort als unvrschlüsselter SMTP Server aus und kann mit dem richtigen SMTP Server passend reden.

[philipp.hofmann]

Just for info: Mit Indy geht TLS 1.2 und dies wird von Strato noch unterstützt. So habe ich das Problem gelöst. War ein 10 Minüter und es finden sich hier im Forum auch schon Beispiele, wie es anzuwenden ist.

[HappyJoe]

@TurboMagic
Danke für die Info.

@philipp.hofmann
Das wäre super, wenn das ginge, aber bist du sicher, dass das auch mit Delphi XE2 geht? In meiner IdSSLOpenSSL.pas (Indy10) steht

TIdSSLVersion = (sslvSSLv2, sslvSSLv23, sslvSSLv3, sslvTLSv1);

und damit ging es bei mir leider nicht

[Delphi.Narium]

Indys mal aktuallisieren?

Mein olles Delphi 7 kann jedenfalls TIdSSLVersion = (sslvSSLv2, sslvSSLv23, sslvSSLv3, sslvTLSv1, sslvTLSv1_1, sslvTLSv1_2)

[HappyJoe]

Ja, das hatte ich versucht, aber nichts gefunden. Wo bekomme ich denn ein Update her? Alle Links, auch hier aus dem Forum, sind veraltet, wie z.B.
https://www.indyproject.org/download/v10