public void Reset()
Public Sub Reset()
public void reset()
public:
void Reset();
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)
{
Console.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
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
Help Collections
Raster .NET | C API | C++ Class Library | HTML5 JavaScript
Document .NET | C API | C++ Class Library | HTML5 JavaScript
Medical .NET | C API | C++ Class Library | HTML5 JavaScript
Medical Web Viewer .NET
Multimedia
Direct Show .NET | C API | Filters
Media Foundation .NET | C API | Transforms
Supported Platforms
.NET, Java, Android, and iOS/macOS Assemblies
Imaging, Medical, and Document
C API/C++ Class Libraries
Imaging, Medical, and Document
HTML5 JavaScript Libraries
Imaging, Medical, and Document