Initialize() Method

Summary

Initializes a ServiceAdministrator object.

Syntax
C#
VB
C++
public bool Initialize() 
  
Public Overloads Function Initialize() As Boolean 
public: 
bool Initialize();  

Return Value

true if the ServiceAdministrator object was successfully intialized.

Example

Check to see if ServiceAdministrator object has been successfully initialized.

C#
VB
using Leadtools; 
using Leadtools.Dicom.AddIn.Common; 
using Leadtools.Dicom.AddIn.Interfaces; 
 
 
public void LockCheck() 
{ 
   ServiceAdministrator admin = new ServiceAdministrator(@"C:\LEADTOOLS 20\Bin\Dotnet\Win32"); 
 
   if (!admin.IsEval) 
   { 
      // 
      // If it isn't an eval then we need to set the license file. 
      // 
      if (admin.IsLocked) 
      { 
         //admin.Unlock("Substitute Your Code"); 
         string MY_LICENSE_FILE = "d:\\temp\\TestLic.lic"; 
         string MY_DEVELOPER_KEY = "xyz123abc"; 
 
         RasterSupport.SetLicense(MY_LICENSE_FILE, MY_DEVELOPER_KEY); 
         if (admin.IsLocked) 
         { 
            Console.WriteLine("Invalid license"); 
            return; 
         } 
         else 
         { 
            // 
            // Once unlocked initialize the services 
            // 
            admin.Initialize(); 
            foreach (KeyValuePair<string, DicomService> service in admin.Services) 
            { 
               Console.WriteLine(service.Value.Settings.AETitle); 
               foreach (IAddInOptions option in service.Value.AddInOptions) 
               { 
                  Console.WriteLine("Option: {0}", option.Text); 
               } 
            } 
         } 
      } 
      Console.WriteLine("License file valid."); 
   } 
   else 
   { 
      if (admin.IsExpired) 
      { 
         Console.WriteLine("Evaluation has expired"); 
      } 
   } 
} 
Imports Leadtools 
Imports Leadtools.Dicom.AddIn.Common 
Imports Leadtools.Dicom.AddIn.Interfaces 
 
 
Public Sub LockCheck() 
   Dim admin As ServiceAdministrator = New ServiceAdministrator("C:\LEADTOOLS 20\Bin\DotNet4\Win32") 
 
   If (Not admin.IsEval) Then 
      ' 
      ' If it isn't an eval then we need to unlock 
      ' 
      If admin.IsLocked Then 
         'admin.Unlock("Substitute Your Code") 
         Dim MY_LICENSE_FILE As String = "d:\temp\TestLic.lic" 
         Dim MY_DEVELOPER_KEY As String = "xyz123abc" 
 
         RasterSupport.SetLicense(MY_LICENSE_FILE, MY_DEVELOPER_KEY) 
         If admin.IsLocked Then 
            Console.WriteLine("Invalid license") 
            Return 
         Else 
            ' 
            ' Once unlocked the Services property will be valid 
            ' 
            admin.Initialize() 
            For Each service As KeyValuePair(Of String, DicomService) In admin.Services 
               Console.WriteLine(service.Value.Settings.AETitle) 
               For Each o As IAddInOptions In service.Value.AddInOptions 
                  Console.WriteLine("Option: {0}", o.Text) 
               Next o 
            Next service 
         End If 
      End If 
      Console.WriteLine("License file valid.") 
   Else 
      If admin.IsExpired Then 
         Console.WriteLine("Evaluation has expired") 
      End If 
   End If 
End Sub 
Requirements

Target Platforms

Help Version 20.0.2019.11.25
Products | Support | Contact Us | Intellectual Property Notices
© 1991-2019 LEAD Technologies, Inc. All Rights Reserved.

Leadtools.Dicom.Server.Admin Assembly