UnlockSupport Example for Delphi

LEADDicom1.UnlockSupport(L_SUPPORT_MEDICAL, 'TestKey');