Hallo zusammen,
mit folgendem Code versuche ich gerade meinen E-Mail Versand auf SSL umzustellen. Ich bekomme allerdings immer die Meldung "Could not load SSL libery"
Irgendjemand eine Idee, wie das mit
Indy genau geht?
Delphi-Quellcode:
//SSL Verschlüsselung
if not chkSSLPostausgang.Checked then
begin
smtpSendMail.IOHandler := nil; // nicht benötigt
smtpSendMail.UseTLS := utNoTLSSupport;
end
else
begin
// SSLHandler inititlisieren
SSLHandler.SSLOptions.Method := sslvTLSv1;
SSLHandler.SSLOptions.Mode := sslmUnassigned;
SSLHandler.SSLOptions.VerifyMode := [];
SSLHandler.SSLOptions.VerifyDepth := 0;
smtpSendMail.IOHandler := SSLHandler;
smtpSendMail.UseTLS := utUseImplicitTLS;
end;
with smtpSendMail do begin
Username := UserEdit.Text;
Password := PasswortEdit.Text;
Host := SMTPEdit.Text;
HeloName := SMTPEdit.Text;
Port := StrToInt(SMTPPortEdit.Text);
Connect;
try
Send(mesgMessage);
finally Disconnect;
end;
end;
Danke schon mal und Gruß Jens