GetEncryptKeyLengthTLS Example for Delphi

      ShowMessage('Effective key length for DICOM_TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA is ' + IntToStr(LEADDICOMNet1.GetEncryptKeyLengthTLS(LEADDICOMNet1.hNet, DICOM_TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA)));