Leadtools.Dicom.Common.Extensions Namespace > DicomExtensions Class : GetImage Method |
Value | Meaning |
---|---|
0 | Keep the original file's pixel depth (do not convert). |
1 to 8 | The specified bits per pixel in the resulting image. |
12 | 12 bits per pixel in the resulting image. |
16 | 16 bits per pixel in the resulting image. |
24 | 24 bits per pixel in the resulting image. |
32 | 32 bits per pixel in the resulting image. |
[ExtensionAttribute()] public static RasterImage GetImage( DicomDataSet ds, DicomElement element, int index, int bitsPerPixel, RasterByteOrder order, DicomGetImageFlags flags, OrientationConfiguration orientation )
'Declaration <ExtensionAttribute()> Public Shared Function GetImage( _ ByVal ds As DicomDataSet, _ ByVal element As DicomElement, _ ByVal index As Integer, _ ByVal bitsPerPixel As Integer, _ ByVal order As RasterByteOrder, _ ByVal flags As DicomGetImageFlags, _ ByVal orientation As OrientationConfiguration _ ) As RasterImage
'Usage Dim ds As DicomDataSet Dim element As DicomElement Dim index As Integer Dim bitsPerPixel As Integer Dim order As RasterByteOrder Dim flags As DicomGetImageFlags Dim orientation As OrientationConfiguration Dim value As RasterImage value = DicomExtensions.GetImage(ds, element, index, bitsPerPixel, order, flags, orientation)
[ExtensionAttribute()] public: static RasterImage^ GetImage( DicomDataSet^ ds, DicomElement^ element, int index, int bitsPerPixel, RasterByteOrder order, DicomGetImageFlags flags, OrientationConfiguration^ orientation )
Value | Meaning |
---|---|
0 | Keep the original file's pixel depth (do not convert). |
1 to 8 | The specified bits per pixel in the resulting image. |
12 | 12 bits per pixel in the resulting image. |
16 | 16 bits per pixel in the resulting image. |
24 | 24 bits per pixel in the resulting image. |
32 | 32 bits per pixel in the resulting image. |
This method will load any image from ds, using element as the parent element to begin the search, where the element searched for is the Leadtools.Dicom.DicomTag.PixelData element. The resulting image has its Leadtools.RasterViewPerspective changed accordingly from applying a Leadtools.Dicom.Common.DataTypes.PlaneOrientation to a given Leadtools.RasterViewPerspective.
The input view perspective is define by two values: the original Leadtools.RasterViewPerspective contained in ds, and a row and column orientation vector (which are read from the ds by searching for the Leadtools.Dicom.DicomElement that has a tag of Leadtools.Dicom.DicomTag.ImageOrientationPatient which contains the orientation vectors.).
Note that the orientation contains three lists of conditions (one for each 3D axis) that can be applied to the image contained in the ds if the condition is met.
Imports Leadtools.Dicom Imports Leadtools.Dicom.Common Imports Leadtools.Dicom.Common.Extensions Imports Leadtools.Dicom.Common.Linq Imports Leadtools.Dicom.Common.Linq.BasicDirectory Imports Leadtools Imports Leadtools.Dicom.Common.DataTypes Public Sub GetImageExample() Dim dicomFileCoronal As String = Path.Combine(LEAD_VARS.ImagesDir, "image3.dcm") Dim ds As New DicomDataSet() ds.Load(dicomFileCoronal, DicomDataSetLoadFlags.None) ' Create a new coronal PlaneOrientation that corresponds to a horizontal flip Dim poCoronal As New PlaneOrientation() poCoronal.Name = "Coronal or Frontal" poCoronal.Top = OrientationAxis.Inferior poCoronal.Right = OrientationAxis.Right poCoronal.Condition = New TagValueOrientationCondition(DicomTag.ImageOrientationPatient, Nothing) If (Not poCoronal.IsValid(Plane.Coronal)) Then MessageBox.Show("Invalid PlaneOrientation for Coronal") Return End If ' Create a new sagittal PlaneOrientation that corresponds to a Rotate90 Dim poSaggital As New PlaneOrientation() poSaggital.Name = "Saggital" poSaggital.Top = OrientationAxis.Anterior poSaggital.Right = OrientationAxis.Inferior poSaggital.Condition = New TagValueOrientationCondition(0, Nothing) If (Not poSaggital.IsValid(Plane.Sagittal)) Then MessageBox.Show("Invalid PlaneOrientation for Sagittal") Return End If ' Create a new Axial that corresponds to a Rotate180 Dim poAxial As New PlaneOrientation() poAxial.Name = "Axial" poAxial.Top = OrientationAxis.Posterior poAxial.Right = OrientationAxis.Left poAxial.Condition = New TagValueOrientationCondition(0, Nothing) If (Not poAxial.IsValid(Plane.Axial)) Then MessageBox.Show("Invalid PlaneOrientation for Axial") Return End If ' Setup the OrientationConfiguration Dim oc As New OrientationConfiguration() oc.Coronal.Add(poCoronal) oc.Sagittal.Add(poSaggital) oc.Axial.Add(poAxial) If (Not oc.IsValid()) Then MessageBox.Show("Invalid OrientationConfiguration") Return End If ' Find the image from the dataset with the new view perspective ' RasterViewPerspective newViewPerspective = ds.GetNewViewPerspective(RasterViewPerspective.TopLeft, oc); Dim image As RasterImage = ds.GetImage(Nothing, 0, 0, RasterByteOrder.Gray, DicomGetImageFlags.None, oc) ' New view perspective should be BottomLeft Dim newViewPerspective As RasterViewPerspective = image.ViewPerspective MessageBox.Show("newViewPerspective should be BottomLeft" & Constants.vbLf & "Actual newViewPerspective is " & newViewPerspective.ToString()) End Sub Public NotInheritable Class LEAD_VARS Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images" End Class