GetEncryptionAlgorithmTLS Example for Delphi

   if(LEADDICOMNet1.GetEncryptionAlgorithmTLS(LEADDICOMNet1.hNet, DICOM_TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA) = DICOM_CRYPT_3DES)then
      ShowMessage('Encryption in DICOM_TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA is DICOM_CRYPT_3DES');