GetAuthenticationAlgorithmTLS Example for Delphi

   if(LEADDICOMNet1.GetAuthenticationAlgorithmTLS (LEADDICOMNet1.hNet, DICOM_TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA) = DICOM_MUTUALAUTH_RSA)then
      ShowMessage('Mutual authentication in DICOM_TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA is DICOM_MUTUALAUTH_RSA');