←Select platform

DeletePaletteColorLut Method

Summary

Deletes all the elements that describe the "Palette Color Lookup Table".

Syntax
C#
VB
C++
Java
public void DeletePaletteColorLut() 
Public Sub DeletePaletteColorLut()  
public void deletePaletteColorLut() 
public: 
void DeletePaletteColorLut();  

Remarks

This method will delete all the elements defined under the "Palette Color Lookup Module", this includes: Red Palette Color Lookup Table Descriptor (0028,1101),

Green Palette Color Lookup Table Descriptor (0028,1102),

Blue Palette Color Lookup Table Descriptor (0028,1103),

Palette Color Lookup Table UID (0028,1199),

Red Palette Color Lookup Table Data (0028,1201),

Green Palette Color Lookup Table Data (0028,1202),

Blue Palette Color Lookup Table Data (0028,1203),

Segmented Red Palette Color Lookup Table Data (0028,1221),

Segmented Green Palette Color Lookup Table Data (0028,1222),

Segmented Blue Palette Color Lookup Table Data (0028,1223)

Example

This example will load a DICOM dataset, update its palette color LUT and then verify that the LUT was updated properly.

C#
VB
using Leadtools; 
using Leadtools.Dicom; 
 
public void TestPaletteColorLut() 
{ 
   string dicomFileName = Path.Combine(LEAD_VARS.ImagesDir, "IMAGE3.dcm"); 
   //Make sure to initialize the DICOM engine, this needs to be done only once  
   //In the whole application 
   DicomEngine.Startup(); 
   using (DicomDataSet ds = new DicomDataSet()) 
   { 
      int paletteColorLutSize = 65536; 
      //Load DICOM File 
      ds.Load(dicomFileName, DicomDataSetLoadFlags.None); 
      ds.DeletePaletteColorLut(); 
      DicomPaletteColorLutAttributes paletteColorLutAttributes = new DicomPaletteColorLutAttributes(); 
      // Initialize Red Palette Color Lookup Table Descriptor (0028,1101)  
      paletteColorLutAttributes.RedFirstStoredPixelValueMapped = 0; 
      paletteColorLutAttributes.RedEntryBits = 16; 
      paletteColorLutAttributes.RedNumberOfEntries = paletteColorLutSize; 
 
      // Initialize Green Palette Color Lookup Table Descriptor (0028,1102)  
      paletteColorLutAttributes.GreenFirstStoredPixelValueMapped = 0; 
      paletteColorLutAttributes.GreenEntryBits = 16; 
      paletteColorLutAttributes.GreenNumberOfEntries = paletteColorLutSize; 
 
      // Initialize Blue Palette Color Lookup Table Descriptor (0028,1103)  
      paletteColorLutAttributes.BlueFirstStoredPixelValueMapped = 0; 
      paletteColorLutAttributes.BlueEntryBits = 16; 
      paletteColorLutAttributes.BlueNumberOfEntries = paletteColorLutSize; 
 
      ds.SetPaletteColorLutAttributes(paletteColorLutAttributes); 
 
      int[] LutData = new int[paletteColorLutSize]; 
      for (int i = 0; i < paletteColorLutSize; i++) 
      { 
         LutData[i] = i; 
      } 
 
      ds.SetPaletteColorLutData(LutData, DicomPaletteColorLutType.Red); 
      ds.SetPaletteColorLutData(LutData, DicomPaletteColorLutType.Green); 
      ds.SetPaletteColorLutData(LutData, DicomPaletteColorLutType.Blue); 
 
      DicomPaletteColorLutAttributes attributes = ds.GetPaletteColorLutAttributes(); 
      if (attributes != null) 
      { 
         Debug.Assert(attributes.RedNumberOfEntries == paletteColorLutSize); 
         Debug.Assert(attributes.GreenNumberOfEntries == paletteColorLutSize); 
         Debug.Assert(attributes.BlueNumberOfEntries == paletteColorLutSize); 
 
         int[] data = ds.GetPaletteColorLutData(DicomPaletteColorLutType.Red); 
         // Do something with the data 
      } 
      ds.Save(Path.Combine(LEAD_VARS.ImagesDir, "PLUT.dcm"), DicomDataSetSaveFlags.None); 
   } 
   DicomEngine.Shutdown(); 
} 
 
static class LEAD_VARS 
{ 
   public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images"; 
} 
Imports Leadtools 
Imports Leadtools.Dicom 
 
Public Sub TestPaletteColorLut() 
   Dim dicomFileName As String = Path.Combine(LEAD_VARS.ImagesDir, "IMAGE3.dcm") 
   'Make sure to initialize the DICOM engine, this needs to be done only once  
   'In the whole application 
   DicomEngine.Startup() 
 
   Dim ds As DicomDataSet = New DicomDataSet() 
   Using (ds) 
      Dim paletteColorLutSize As Integer = 65536 
      'Load DICOM File 
      ds.Load(dicomFileName, DicomDataSetLoadFlags.None) 
      ds.DeletePaletteColorLut() 
      Dim paletteColorLutAttributes As DicomPaletteColorLutAttributes = New DicomPaletteColorLutAttributes() 
      ' Initialize Red Palette Color Lookup Table Descriptor (0028,1101)  
      paletteColorLutAttributes.RedFirstStoredPixelValueMapped = 0 
      paletteColorLutAttributes.RedEntryBits = 16 
      paletteColorLutAttributes.RedNumberOfEntries = paletteColorLutSize 
 
      ' Initialize Green Palette Color Lookup Table Descriptor (0028,1102)  
      paletteColorLutAttributes.GreenFirstStoredPixelValueMapped = 0 
      paletteColorLutAttributes.GreenEntryBits = 16 
      paletteColorLutAttributes.GreenNumberOfEntries = paletteColorLutSize 
 
      ' Initialize Blue Palette Color Lookup Table Descriptor (0028,1103)  
      paletteColorLutAttributes.BlueFirstStoredPixelValueMapped = 0 
      paletteColorLutAttributes.BlueEntryBits = 16 
      paletteColorLutAttributes.BlueNumberOfEntries = paletteColorLutSize 
 
      ds.SetPaletteColorLutAttributes(paletteColorLutAttributes) 
 
      Dim LutData As Integer() = New Integer(paletteColorLutSize - 1) {} 
      Dim i As Integer = 0 
      Do While i < paletteColorLutSize 
         LutData(i) = i 
         i += 1 
      Loop 
 
      ds.SetPaletteColorLutData(LutData, DicomPaletteColorLutType.Red) 
      ds.SetPaletteColorLutData(LutData, DicomPaletteColorLutType.Green) 
      ds.SetPaletteColorLutData(LutData, DicomPaletteColorLutType.Blue) 
 
      Dim attributes As DicomPaletteColorLutAttributes = ds.GetPaletteColorLutAttributes() 
      If Not attributes Is Nothing Then 
         Debug.Assert(attributes.RedNumberOfEntries = paletteColorLutSize) 
         Debug.Assert(attributes.GreenNumberOfEntries = paletteColorLutSize) 
         Debug.Assert(attributes.BlueNumberOfEntries = paletteColorLutSize) 
 
         Dim data As Integer() = ds.GetPaletteColorLutData(DicomPaletteColorLutType.Red) 
         ' Do something with the data 
      End If 
      ds.Save(Path.Combine(LEAD_VARS.ImagesDir, "PLUT.dcm"), DicomDataSetSaveFlags.None) 
   End Using 
   DicomEngine.Shutdown() 
End Sub 
 
Public NotInheritable Class LEAD_VARS 
   Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images" 
End Class 
c#[Silverlight C# Example] 
using Leadtools; 
using Leadtools.Dicom; 
using Leadtools.Examples; 
 
public void TestPaletteColorLut(Stream dicomStream, Stream outputStream) 
{ 
   //Make sure to initialize the DICOM engine, this needs to be done only once  
   //In the whole application 
   DicomEngine.Startup(); 
   using (DicomDataSet ds = new DicomDataSet()) 
   { 
      int paletteColorLutSize = 65536; 
      //Load DICOM File 
      ds.Load(dicomStream, DicomDataSetLoadFlags.None); 
      ds.DeletePaletteColorLut(); 
      DicomPaletteColorLutAttributes paletteColorLutAttributes = new DicomPaletteColorLutAttributes(); 
      // Initialize Red Palette Color Lookup Table Descriptor (0028,1101)  
      paletteColorLutAttributes.RedFirstStoredPixelValueMapped = 0; 
      paletteColorLutAttributes.RedEntryBits = 16; 
      paletteColorLutAttributes.RedNumberOfEntries = paletteColorLutSize; 
 
      // Initialize Green Palette Color Lookup Table Descriptor (0028,1102)  
      paletteColorLutAttributes.GreenFirstStoredPixelValueMapped = 0; 
      paletteColorLutAttributes.GreenEntryBits = 16; 
      paletteColorLutAttributes.GreenNumberOfEntries = paletteColorLutSize; 
 
      // Initialize Blue Palette Color Lookup Table Descriptor (0028,1103)  
      paletteColorLutAttributes.BlueFirstStoredPixelValueMapped = 0; 
      paletteColorLutAttributes.BlueEntryBits = 16; 
      paletteColorLutAttributes.BlueNumberOfEntries = paletteColorLutSize; 
 
      ds.SetPaletteColorLutAttributes(paletteColorLutAttributes); 
 
      int[] LutData = new int[paletteColorLutSize]; 
      for (int i = 0; i < paletteColorLutSize; i++) 
      { 
         LutData[i] = i; 
      } 
 
      ds.SetPaletteColorLutData(LutData, DicomPaletteColorLutType.Red); 
      ds.SetPaletteColorLutData(LutData, DicomPaletteColorLutType.Green); 
      ds.SetPaletteColorLutData(LutData, DicomPaletteColorLutType.Blue); 
 
      DicomPaletteColorLutAttributes attributes = ds.GetPaletteColorLutAttributes(); 
      if (attributes != null) 
      { 
         Debug.Assert(attributes.RedNumberOfEntries == paletteColorLutSize); 
         Debug.Assert(attributes.GreenNumberOfEntries == paletteColorLutSize); 
         Debug.Assert(attributes.BlueNumberOfEntries == paletteColorLutSize); 
 
         int[] data = ds.GetPaletteColorLutData(DicomPaletteColorLutType.Red); 
         // Do something with the data 
      } 
      ds.Save(outputStream, DicomDataSetSaveFlags.None); 
   } 
   DicomEngine.Shutdown(); 
} 
vb[Silverlight VB Example] 
Imports Leadtools 
Imports Leadtools.Dicom 
 
Public Sub TestPaletteColorLut(ByVal dicomStream As Stream, ByVal outputStream As Stream) 
   'Make sure to initialize the DICOM engine, this needs to be done only once  
   'In the whole application 
   DicomEngine.Startup() 
   Using ds As DicomDataSet = New DicomDataSet() 
      Dim paletteColorLutSize As Integer = 65536 
      'Load DICOM File 
      ds.Load(dicomStream, DicomDataSetLoadFlags.None) 
      ds.DeletePaletteColorLut() 
      Dim paletteColorLutAttributes As DicomPaletteColorLutAttributes = New DicomPaletteColorLutAttributes() 
      ' Initialize Red Palette Color Lookup Table Descriptor (0028,1101)  
      paletteColorLutAttributes.RedFirstStoredPixelValueMapped = 0 
      paletteColorLutAttributes.RedEntryBits = 16 
      paletteColorLutAttributes.RedNumberOfEntries = paletteColorLutSize 
 
      ' Initialize Green Palette Color Lookup Table Descriptor (0028,1102)  
      paletteColorLutAttributes.GreenFirstStoredPixelValueMapped = 0 
      paletteColorLutAttributes.GreenEntryBits = 16 
      paletteColorLutAttributes.GreenNumberOfEntries = paletteColorLutSize 
 
      ' Initialize Blue Palette Color Lookup Table Descriptor (0028,1103)  
      paletteColorLutAttributes.BlueFirstStoredPixelValueMapped = 0 
      paletteColorLutAttributes.BlueEntryBits = 16 
      paletteColorLutAttributes.BlueNumberOfEntries = paletteColorLutSize 
 
      ds.SetPaletteColorLutAttributes(paletteColorLutAttributes) 
 
      Dim LutData As Integer() = New Integer(paletteColorLutSize - 1) {} 
      Dim i As Integer = 0 
      Do While i < paletteColorLutSize 
         LutData(i) = i 
         i += 1 
      Loop 
 
      ds.SetPaletteColorLutData(LutData, DicomPaletteColorLutType.Red) 
      ds.SetPaletteColorLutData(LutData, DicomPaletteColorLutType.Green) 
      ds.SetPaletteColorLutData(LutData, DicomPaletteColorLutType.Blue) 
 
      Dim attributes As DicomPaletteColorLutAttributes = ds.GetPaletteColorLutAttributes() 
      If Not attributes Is Nothing Then 
         Debug.Assert(attributes.RedNumberOfEntries = paletteColorLutSize) 
         Debug.Assert(attributes.GreenNumberOfEntries = paletteColorLutSize) 
         Debug.Assert(attributes.BlueNumberOfEntries = paletteColorLutSize) 
 
         Dim data As Integer() = ds.GetPaletteColorLutData(DicomPaletteColorLutType.Red) 
         ' Do something with the data 
      End If 
      ds.Save(outputStream, DicomDataSetSaveFlags.None) 
   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