LEADTOOLS Medical (Leadtools.Dicom assembly)

Reset Method (DicomVRTable)

Show in webframe
Example 







Removes all items from the Value Representation Table.
Syntax
public void Reset()
'Declaration
 
Public Sub Reset() 
'Usage
 
Dim instance As DicomVRTable
 
instance.Reset()
public void Reset()

            
public void reset()
 function Leadtools.Dicom.DicomVRTable.Reset()
public:
void Reset(); 
Remarks
Example
Copy Code  
Imports Leadtools
Imports Leadtools.Dicom

Private Sub TestVRTable()

         'Make sure to initialize the DICOM engine, this needs to be done only once 
         'In the whole application
         DicomEngine.Startup()

         'We don't need to call this since the DicomEngine.Startup already does that for us
         'These calls are for demonstration purposes only
         DicomVRTable.Instance.Reset()
         DicomVRTable.Instance.Default()

         'We can also call FindByIndex if we know the index of this VR
         Dim vr As DicomVR = DicomVRTable.Instance.Find(DicomVRType.AE)
         DicomVRTable.Instance.Delete(vr)

         Dim vr1 As DicomVR = DicomVRTable.Instance.Insert(DicomVRType.AE, "My AE VR", 16, DicomVRRestriction.StringFixed, 1)
         Debug.Assert(DicomVRTable.Instance.Exists(vr1) = True)
         DicomVRTable.Instance.SetName(vr1, "My New AE VR")

         Dim count As Integer = 0
         'If we want to loop through all the VRs in the table we can do this:
         vr = DicomVRTable.Instance.GetFirst()
         Do While Not vr Is Nothing
             ' We can also access the rest of the properties of DicomVR in here,
             ' such as DicomVRType.Code, DicomVRType.Length, DicomVRType.Name,
             ' DicomVRType.Restriction and DicomVRType.UnitSize
             If vr.Code = DicomVRType.AE Then
                 MessageBox.Show(vr.Name)
             End If
             count += 1
             vr = DicomVRTable.Instance.GetNext(vr)
         Loop
         'We can use GetLast and GetPrevious to achieve the same thing

         Debug.Assert(count = DicomVRTable.Instance.GetCount())

         DicomEngine.Shutdown()
     End Sub
using Leadtools;
using Leadtools.Dicom;

public void TestVRTable()
{

   //Make sure to initialize the DICOM engine, this needs to be done only once 
   //In the whole application
   DicomEngine.Startup();

   //We don't need to call this since the DicomEngine.Startup already does that for us
   //These calls are for demonstration purposes only
   DicomVRTable.Instance.Reset();
   DicomVRTable.Instance.Default();

   //We can also call FindByIndex if we know the index of this VR
   DicomVR vr = DicomVRTable.Instance.Find(DicomVRType.AE);
   DicomVRTable.Instance.Delete(vr);

   DicomVR vr1 = DicomVRTable.Instance.Insert(DicomVRType.AE, "My AE VR", 16, DicomVRRestriction.StringFixed, 1);
   Debug.Assert(DicomVRTable.Instance.Exists(vr1) == true);
   DicomVRTable.Instance.SetName(vr1, "My New AE VR");

   int count = 0;
   //If we want to loop through all the VRs in the table we can do this:
   vr = DicomVRTable.Instance.GetFirst();
   while (vr != null)
   {
      // We can also access the rest of the properties of DicomVR in here,
      // such as DicomVRType.Code, DicomVRType.Length, DicomVRType.Name,
      // DicomVRType.Restriction and DicomVRType.UnitSize
      if (vr.Code == DicomVRType.AE)
      {
         MessageBox.Show(vr.Name);
      }
      count++;
      vr = DicomVRTable.Instance.GetNext(vr);
   }
   //We can use GetLast and GetPrevious to achieve the same thing

   Debug.Assert(count == DicomVRTable.Instance.GetCount());

   DicomEngine.Shutdown();
}
using Leadtools;
using Leadtools.Dicom;
using Leadtools.Examples;

public void TestVRTable()
{
   //Make sure to initialize the DICOM engine, this needs to be done only once 
   //In the whole application
   DicomEngine.Startup();
   //We don't need to call this since the DicomEngine.Startup already does that for us
   //These calls are for demonstration purposes only
   DicomVRTable.Instance.Reset();
   DicomVRTable.Instance.Default();

   //We can also call FindByIndex if we know the index of this VR
   DicomVR vr = DicomVRTable.Instance.Find(DicomVRType.AE);
   DicomVRTable.Instance.Delete(vr);

   DicomVR vr1 = DicomVRTable.Instance.Insert(DicomVRType.AE, "My AE VR", 16, DicomVRRestriction.StringFixed, 1);
   Debug.Assert(DicomVRTable.Instance.Exists(vr1) == true);
   DicomVRTable.Instance.SetName(vr1, "My New AE VR");

   int count = 0;
   //If we want to loop through all the VRs in the table we can do this:
   vr = DicomVRTable.Instance.GetFirst();
   while (vr != null)
   {
      // We can also access the rest of the properties of DicomVR in here,
      // such as DicomVRType.Code, DicomVRType.Length, DicomVRType.Name,
      // DicomVRType.Restriction and DicomVRType.UnitSize
      if (vr.Code == DicomVRType.AE)
      {
         Debug.WriteLine(vr.Name);
      }
      count++;
      vr = DicomVRTable.Instance.GetNext(vr);
   }
   //We can use GetLast and GetPrevious to achieve the same thing

   Debug.Assert(count == DicomVRTable.Instance.GetCount());

   DicomEngine.Shutdown();
}
Imports Leadtools
Imports Leadtools.Dicom

Public Sub TestVRTable()
   'Make sure to initialize the DICOM engine, this needs to be done only once 
   'In the whole application
   DicomEngine.Startup()
   'We don't need to call this since the DicomEngine.Startup already does that for us
   'These calls are for demonstration purposes only
   DicomVRTable.Instance.Reset()
   DicomVRTable.Instance.Default()

   'We can also call FindByIndex if we know the index of this VR
   Dim vr As DicomVR = DicomVRTable.Instance.Find(DicomVRType.AE)
   DicomVRTable.Instance.Delete(vr)

   Dim vr1 As DicomVR = DicomVRTable.Instance.Insert(DicomVRType.AE, "My AE VR", 16, DicomVRRestriction.StringFixed, 1)
   Debug.Assert(DicomVRTable.Instance.Exists(vr1) = True)
   DicomVRTable.Instance.SetName(vr1, "My New AE VR")

   Dim count As Integer = 0
   'If we want to loop through all the VRs in the table we can do this:
   vr = DicomVRTable.Instance.GetFirst()
   Do While Not vr Is Nothing
      ' We can also access the rest of the properties of DicomVR in here,
      ' such as DicomVRType.Code, DicomVRType.Length, DicomVRType.Name,
      ' DicomVRType.Restriction and DicomVRType.UnitSize
      If vr.Code = DicomVRType.AE Then
         Debug.WriteLine(vr.Name)
      End If
      count += 1
      vr = DicomVRTable.Instance.GetNext(vr)
   Loop
   'We can use GetLast and GetPrevious to achieve the same thing

   Debug.Assert(count = DicomVRTable.Instance.GetCount())

   DicomEngine.Shutdown()
End Sub
Requirements

Target Platforms

See Also

Reference

DicomVRTable Class
DicomVRTable Members
Default Method
Delete Method

 

 


Products | Support | Contact Us | Copyright Notices
© 2006-2014 All Rights Reserved. LEAD Technologies, Inc.

Leadtools.Dicom requires a Medical toolkit server license and unlock key. For more information, refer to: Imaging Pro/Document/Medical Features