←Select platform

DeleteModule Method

Summary

Deletes a module from the Data Set.

Syntax
C#
VB
C++
Java
public void DeleteModule( 
   DicomModuleType module 
) 
Public Sub DeleteModule( _ 
   ByVal module As DicomModuleType _ 
)  
public void deleteModule(DicomModuleType module) 
public: 
void DeleteModule(  
   DicomModuleType module 
)  

Parameters

module
The module to be deleted.

Remarks

You can remove all items from the Data Set using Reset.

Example

This example will initialize a DICOM Dataset and then insert and delete some of its modules.

C#
VB
using Leadtools; 
using Leadtools.Dicom; 
 
public void DicomModuleSample() 
{ 
   //Make sure to initialize the DICOM engine, this needs to be done only once  
   //In the whole application 
   DicomEngine.Startup(); 
   using (DicomDataSet dicomDataset = new DicomDataSet()) 
   { 
      dicomDataset.Initialize(DicomClassType.DXImageStoragePresentation, DicomDataSetInitializeType.ExplicitVRLittleEndian); 
      dicomDataset.DeleteModule(DicomModuleType.Patient); 
      dicomDataset.InsertModule(DicomModuleType.Patient, false); 
      DicomModule module = dicomDataset.FindModule(DicomModuleType.Patient); 
      Debug.Assert(module != null); 
      bool found = false; 
      for (int i = 0; i < dicomDataset.ModuleCount; i++) 
      { 
         module = dicomDataset.FindModuleByIndex(i); 
         if (module.Type == DicomModuleType.Patient) 
         { 
            found = true; 
         } 
      } 
      Debug.Assert(found); 
   } 
   DicomEngine.Shutdown(); 
} 
Imports Leadtools 
Imports Leadtools.Dicom 
 
Public Sub DicomModuleSample() 
   'Make sure to initialize the DICOM engine, this needs to be done only once  
   'In the whole application 
   DicomEngine.Startup() 
 
   Dim dicomDataset As DicomDataSet = New DicomDataSet() 
   Using (dicomDataset) 
 
      dicomDataset.Initialize(DicomClassType.DXImageStoragePresentation, DicomDataSetInitializeType.ExplicitVRLittleEndian) 
      dicomDataset.DeleteModule(DicomModuleType.Patient) 
      dicomDataset.InsertModule(DicomModuleType.Patient, False) 
      Dim [module] As DicomModule = dicomDataset.FindModule(DicomModuleType.Patient) 
      Debug.Assert(Not [module] Is Nothing) 
      Dim found As Boolean = False 
      Dim i As Integer = 0 
      Do While i < dicomDataset.ModuleCount 
         [module] = dicomDataset.FindModuleByIndex(i) 
         If [module].Type = DicomModuleType.Patient Then 
            found = True 
         End If 
         i += 1 
      Loop 
      Debug.Assert(found) 
   End Using 
 
   DicomEngine.Shutdown() 
End Sub 
c#[Silverlight C# Example] 
using Leadtools; 
using Leadtools.Dicom; 
using Leadtools.Examples; 
 
public void DicomModuleSample() 
{ 
   //Make sure to initialize the DICOM engine, this needs to be done only once  
   //In the whole application 
   DicomEngine.Startup(); 
   using (DicomDataSet dicomDataset = new DicomDataSet()) 
   { 
      dicomDataset.Initialize(DicomClassType.DXImageStoragePresentation, DicomDataSetInitializeType.ExplicitVRLittleEndian); 
      dicomDataset.DeleteModule(DicomModuleType.Patient); 
      dicomDataset.InsertModule(DicomModuleType.Patient, false); 
      DicomModule module = dicomDataset.FindModule(DicomModuleType.Patient); 
      Debug.Assert(module != null); 
      bool found = false; 
      for (int i = 0; i < dicomDataset.ModuleCount; i++) 
      { 
         module = dicomDataset.FindModuleByIndex(i); 
         if (module.Type == DicomModuleType.Patient) 
         { 
            found = true; 
         } 
      } 
      Debug.Assert(found); 
   } 
   DicomEngine.Shutdown(); 
} 
vb[Silverlight VB Example] 
Imports Leadtools 
Imports Leadtools.Dicom 
 
Public Sub DicomModuleSample() 
   'Make sure to initialize the DICOM engine, this needs to be done only once  
   'In the whole application 
   DicomEngine.Startup() 
   Using dicomDataset As DicomDataSet = New DicomDataSet() 
      dicomDataset.Initialize(DicomClassType.DXImageStoragePresentation, DicomDataSetInitializeType.ExplicitVRLittleEndian) 
      dicomDataset.DeleteModule(DicomModuleType.Patient) 
      dicomDataset.InsertModule(DicomModuleType.Patient, False) 
      Dim [module] As DicomModule = dicomDataset.FindModule(DicomModuleType.Patient) 
      Debug.Assert(Not [module] Is Nothing) 
      Dim found As Boolean = False 
      Dim i As Integer = 0 
      Do While i < dicomDataset.ModuleCount 
         [module] = dicomDataset.FindModuleByIndex(i) 
         If [module].Type = DicomModuleType.Patient Then 
            found = True 
         End If 
         i += 1 
      Loop 
      Debug.Assert(found) 
   End Using 
   DicomEngine.Shutdown() 
End Sub 

Requirements

Target Platforms

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

Leadtools.Dicom Assembly