Leadtools Namespace > Classes > RasterImage > Methods > SetLookupTable Method

public void SetLookupTable(  
   Leadtools.RasterColor[] value 
) 

Public Sub SetLookupTable( _ 
   ByVal value() As Leadtools.RasterColor _ 
)  

public void SetLookupTable(  
   Leadtools.RasterColor[] value 
) 

- (BOOL)setLookupTable:(nullable NSArray<LTRasterColor *> *)lut error:(NSError **)error 

public void setLookupTable(RasterColor[] value) 

 function Leadtools.RasterImage.SetLookupTable(  
   value  
) 

public: 
void SetLookupTable(  
   Leadtools.array<RasterColor>^ value 
)  

using Leadtools; 
using Leadtools.Codecs; 
using Leadtools.ImageProcessing; 
using Leadtools.ImageProcessing.Core; 
using Leadtools.ImageProcessing.Color; 
using Leadtools.Dicom; 
using Leadtools.Drawing; 
using Leadtools.Controls; 
using LeadtoolsExamples.Common; 
using Leadtools.Svg; 
 
public void SetLookupTable() 
{ 
   DicomEngine.Startup(); 
 
   // Create a RasterCodecs class for saving out images 
   RasterCodecs codecs = new RasterCodecs(); 
 
   // Load a dataset 
   DicomDataSet ds = new DicomDataSet(); 
   ds.Load(Path.Combine(ImagesPath.Path, "IMAGE3.dcm"), DicomDataSetLoadFlags.None); 
 
   // Get the image but do NOT auto-apply any of the LUTs 
   DicomElement element = ds.FindFirstElement(null, DicomTag.PixelData, true); 
   RasterImage image = ds.GetImage(element, 0, 16, RasterByteOrder.Gray, DicomGetImageFlags.None); 
   image.UseLookupTable = true; 
 
   // Save out the image without any LUTs applied.  It should be black 
   codecs.Save(image, Path.Combine(ImagesPath.Path, "BeforeSetLookupTable.bmp"), RasterImageFormat.Bmp, 8); 
 
   // Create a LUT 
   RasterColor[] lut = new RasterColor[(int)Math.Pow(2, 16)]; 
 
   // Get the Minimum and Maximum values so we can calculate appropriate LUT values. 
   MinMaxValuesCommand cmdMinMax = new MinMaxValuesCommand(); 
   cmdMinMax.Run(image); 
   int maxVal = cmdMinMax.MaximumValue; 
   int minVal = cmdMinMax.MinimumValue; 
 
   for (int i = 0; i < lut.Length; i++) 
   { 
      lut[i].R = Convert.ToByte(Math.Min(255, ((i - minVal) * 255 / (maxVal - minVal)))); 
      lut[i].G = lut[i].R; 
      lut[i].B = lut[i].R; 
   } 
 
   // Set the new lookup table 
   image.SetLookupTable(lut); 
 
   // Save out the image with the LUT applied.  It should look normal 
   codecs.Save(image, Path.Combine(ImagesPath.Path, "AfterSetLookupTable.bmp"), RasterImageFormat.Bmp, 8); 
 
   DicomEngine.Shutdown(); 
} 

Imports Leadtools 
Imports Leadtools.Codecs 
Imports Leadtools.ImageProcessing 
Imports Leadtools.ImageProcessing.Core 
Imports Leadtools.ImageProcessing.Color 
Imports Leadtools.Controls 
Imports Leadtools.Dicom 
Imports Leadtools.Drawing 
Imports Leadtools.Svg 
 
Private Sub SetLookupTable() 
   DicomEngine.Startup() 
 
   ' Get the path of the LEADTOOLS images directory 
   Dim strImagesDirectory As String = Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments) & "//LEADTOOLS Images//" 
 
   ' Create a RasterCodecs class for saving out images 
   Dim codecs As RasterCodecs = New RasterCodecs() 
 
   ' Load a dataset 
   Dim ds As DicomDataSet = New DicomDataSet() 
   ds.Load(strImagesDirectory & "IMAGE3.dcm", DicomDataSetLoadFlags.None) 
 
   ' Get the image but do NOT auto-apply any of the LUTs 
   Dim element As DicomElement = ds.FindFirstElement(Nothing, DicomTag.PixelData, True) 
   Dim image As RasterImage = ds.GetImage(element, 0, 16, RasterByteOrder.Gray, DicomGetImageFlags.None) 
   image.UseLookupTable = True 
 
   ' Save out the image without any LUTs applied.  It should be black 
   codecs.Save(image, strImagesDirectory & "BeforeSetLookupTable.bmp", RasterImageFormat.Bmp, 8) 
 
   ' Create a LUT 
   Dim lut As RasterColor() = New RasterColor(CInt(Math.Pow(2, 16)) - 1) {} 
 
   ' Get the Minimum and Maximum values so we can calculate appropriate LUT values. 
   Dim cmdMinMax As MinMaxValuesCommand = New MinMaxValuesCommand() 
   cmdMinMax.Run(image) 
   Dim maxVal As Integer = cmdMinMax.MaximumValue 
   Dim minVal As Integer = cmdMinMax.MinimumValue 
 
   Dim i As Integer = 0 
   Do While i < lut.Length 
      lut(i).R = Convert.ToByte(Math.Min(255, ((i - minVal) * 255 / (maxVal - minVal)))) 
      lut(i).G = lut(i).R 
      lut(i).B = lut(i).R 
      i += 1 
   Loop 
 
   ' Set the new lookup table 
   image.SetLookupTable(lut) 
 
   ' Save out the image with the LUT applied.  It should look normal 
   codecs.Save(image, strImagesDirectory & "AfterSetLookupTable.bmp", RasterImageFormat.Bmp, 8) 
 
   DicomEngine.Shutdown() 
End Sub 

using Leadtools; 
using Leadtools.Codecs; 
using Leadtools.Dicom; 
using Leadtools.ImageProcessing; 
using Leadtools.ImageProcessing.Core; 
using Leadtools.ImageProcessing.Color; 
using Leadtools.Examples; 
using Leadtools.Windows.Media; 
 
public void SetLookupTable(Stream dataSetStream, Stream destStream1, Stream destStream2) 
{ 
   // Create a RasterCodecs class for saving out images 
   RasterCodecs codecs = new RasterCodecs(); 
 
   // Load a dataset 
   DicomDataSet ds = new DicomDataSet(); 
   ds.Load(dataSetStream, DicomDataSetLoadFlags.None); 
 
   // Get the image but do NOT auto-apply any of the LUTs 
   DicomElement element = ds.FindFirstElement(null, DicomTag.PixelData, true); 
   RasterImage image = ds.GetImage(element, 0, 16, RasterByteOrder.Gray, DicomGetImageFlags.None); 
   image.UseLookupTable = true; 
 
   // Save out the image without any LUTs applied.  It should be black 
   codecs.Save(image, destStream1, RasterImageFormat.Bmp, 8); 
 
   // Create a LUT 
   RasterColor[] lut = new RasterColor[(int)Math.Pow(2, 16)]; 
 
   // Get the Minimum and Maximum values so we can calculate appropriate LUT values. 
   MinMaxValuesCommand cmdMinMax = new MinMaxValuesCommand(); 
   cmdMinMax.Run(image); 
   int maxVal = cmdMinMax.MaximumValue; 
   int minVal = cmdMinMax.MinimumValue; 
 
   for (int i = 0; i < lut.Length; i++) 
   { 
      lut[i].R = Convert.ToByte(Math.Min(255, ((i - minVal) * 255 / (maxVal - minVal)))); 
      lut[i].G = lut[i].R; 
      lut[i].B = lut[i].R; 
   } 
 
   // Set the new lookup table 
   image.SetLookupTable(lut); 
 
   // Save out the image with the LUT applied.  It should look normal 
   codecs.Save(image, destStream2, RasterImageFormat.Bmp, 8); 
 
   DicomEngine.Shutdown(); 
} 

Imports Leadtools 
Imports Leadtools.Codecs 
Imports Leadtools.Dicom 
Imports Leadtools.ImageProcessing 
Imports Leadtools.ImageProcessing.Core 
Imports Leadtools.ImageProcessing.Color 
Imports Leadtools.Windows.Media 
 
Public Sub SetLookupTable(ByVal dataSetStream As Stream, ByVal destStream1 As Stream, ByVal destStream2 As Stream) 
   ' Create a RasterCodecs class for saving out images 
   Dim codecs As RasterCodecs = New RasterCodecs() 
 
   ' Load a dataset 
   Dim ds As DicomDataSet = New DicomDataSet() 
   ds.Load(dataSetStream, DicomDataSetLoadFlags.None) 
 
   ' Get the image but do NOT auto-apply any of the LUTs 
   Dim element As DicomElement = ds.FindFirstElement(Nothing, DicomTag.PixelData, True) 
   Dim image As RasterImage = ds.GetImage(element, 0, 16, RasterByteOrder.Gray, DicomGetImageFlags.None) 
   image.UseLookupTable = True 
 
   ' Save out the image without any LUTs applied.  It should be black 
   codecs.Save(image, destStream1, RasterImageFormat.Bmp, 8) 
 
   ' Create a LUT 
   Dim lut As RasterColor() = New RasterColor(CInt(Math.Pow(2, 16)) - 1) {} 
 
   ' Get the Minimum and Maximum values so we can calculate appropriate LUT values. 
   Dim cmdMinMax As MinMaxValuesCommand = New MinMaxValuesCommand() 
   cmdMinMax.Run(image) 
   Dim maxVal As Integer = cmdMinMax.MaximumValue 
   Dim minVal As Integer = cmdMinMax.MinimumValue 
 
   Dim i As Integer = 0 
   Do While i < lut.Length 
      lut(i).R = Convert.ToByte(Math.Min(255, ((i - minVal) * 255 / (maxVal - minVal)))) 
      lut(i).G = lut(i).R 
      lut(i).B = lut(i).R 
      i += 1 
   Loop 
 
   ' Set the new lookup table 
   image.SetLookupTable(lut) 
 
   ' Save out the image with the LUT applied.  It should look normal 
   codecs.Save(image, destStream2, RasterImageFormat.Bmp, 8) 
 
   DicomEngine.Shutdown() 
End Sub 

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

Leadtools Assembly