Danke für den Hinweis. Da war ein Fehler. Habe ich aber bereits behoben.
Mittlerweile habe ich mich hieraufgestürtzt:
http://www.delphipraxis.net/174452-x...nt-senden.html
Delphi-Quellcode:
function TTMSFrmWorkstationEinstellen.SSLVerifyPeerEventHandler(
Certificate: TIdX509; AOk: Boolean; ADepth, AError: Integer): Boolean;
begin
Result := AOK or
// Selbsterstellte Zertifikate akzeptieren
(AError = X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT);
end;
Diese function kann nicht compiliert werden.
Fehler: E2003 Undeklarierter Bezeichner: .....
Die
Unit IdSSLOpenSSL ist eingebunden.
Langsam verzweilfel ich. Irgendwo muss doch der Fehler sein.
Mit Gruß
HPB