Error processing SSI file
LEADTOOLS Medical
Show in webframe

FromAnnContainerToDataSet(DicomDataSet,DicomElement,AnnContainer) Method






Leadtools.Dicom.Annotations.Core Namespace > DicomAnnotationsUtilities Class > FromAnnContainerToDataSet Method : FromAnnContainerToDataSet(DicomDataSet,DicomElement,AnnContainer) Method
The Leadtools.Dicom.DicomDataSet where the resulting DICOM Annotation objects are stored.
The specific Leadtools.Dicom.DicomElement where the resulting DICOM Annotation objects are stored.
The Leadtools.Annotations.Core.AnnContainer that contains a list of Leadtools.Annotations.Core.AnnObject objects that are to be converted.
Converts all the LEAD Annotation objects in an AnnContainer into one or more DICOM annotation objects, and stores the result in a Leadtools.Dicom.DicomDataSet.
Syntax
public DicomElement FromAnnContainerToDataSet( 
   DicomDataSet ds,
   DicomElement graphicAnnotationSequenceItem,
   AnnContainer annContainer
)
'Declaration
 
Public Overloads Function FromAnnContainerToDataSet( _
   ByVal ds As DicomDataSet, _
   ByVal graphicAnnotationSequenceItem As DicomElement, _
   ByVal annContainer As AnnContainer _
) As DicomElement
'Usage
 
Dim instance As DicomAnnotationsUtilities
Dim ds As DicomDataSet
Dim graphicAnnotationSequenceItem As DicomElement
Dim annContainer As AnnContainer
Dim value As DicomElement
 
value = instance.FromAnnContainerToDataSet(ds, graphicAnnotationSequenceItem, annContainer)

            

        

            

            

            

        

            

            
public:
DicomElement^ FromAnnContainerToDataSet( 
   DicomDataSet^ ds,
   DicomElement^ graphicAnnotationSequenceItem,
   AnnContainer^ annContainer
) 

            

        

            

        
            
Parameters
ds


The Leadtools.Dicom.DicomDataSet where the resulting DICOM Annotation objects are stored.
graphicAnnotationSequenceItem


The specific Leadtools.Dicom.DicomElement where the resulting DICOM Annotation objects are stored.
annContainer


The Leadtools.Annotations.Core.AnnContainer that contains a list of Leadtools.Annotations.Core.AnnObject objects that are to be converted.

            
            
Return Value
A Leadtools.Dicom.DicomElement that represents GraphicAnnotationSequence item that contains the DICOM Annotations.

            
            
            
            
Remarks
This function converts a LEAD Leadtools.Annotations.Core.AnnContainer of Leadtools.Annotations.Core.AnnObject objects into one or more DICOM annotation objects (text, graphic, and compound graphic), and stores the result in a the specified Graphic Annotation Sequence Item Element inside the ds inside the ds parameter. If any of the resulting DICOM annotation object is a "Compound Graphic " then it will be added under the "Compound Graphic Sequence" and for backward compatibility (as per the DICOM Specification) it will also be added under the "Graphic Object Sequence". If the resulting DICOM annotation object is a "Text Object" then it will be added under the "Text Object Sequence". If the resulting DICOM annotation object is a "Graphic Object" then it will be added under the "Graphic Object Sequence". Note: when converting a Leadtools.Annotations.Core.AnnPolyRulerObject, Leadtools.Annotations.Core.AnnProtractorObject, or Leadtools.Annotations.Core.AnnCrossProductObject, the result will be one or more 'grouped' Leadtools.Dicom.DicomAnnotationObject objects which have the same Leadtools.Dicom.DicomAnnotationObject.GraphicGroupId. In this case, a corresponding Graphic Group Sequence item (0070,0234) will be inserted into the ds.

          
            
Example
This example does the following:



    
    
  1. Creates a Leadtools.Annotations.Core.AnnRectangleObject, a Leadtools.Annotations.Core.AnnPointerObject, and a Leadtools.Annotations.Core.AnnPolyRulerObject.
    2. 

    
  2. Creates an Leadtools.Annotations.Core.AnnContainer and adds the three objects
    3. 

    
  3. Creates a converter
    4. 

    
  4. Converts the Leadtools.Annotations.Core.AnnContainer to DICOM Annotations, and stores the result in a file that contains a Grayscale Softcopy Presentation
    5. 




             
    

            
            

            Copy Code
                
            

            

    

     

            
Imports Leadtools
Imports Leadtools.Dicom
Imports Leadtools.Dicom.Annotations.Core
Imports Leadtools.Annotations.Core

Private Sub DicomAnnotationsUtilities_FromAnnContainerToDataSet(ByVal dsImage As DicomDataSet, ByVal outfilePresentationState As String)
   ' Create an AnnRectangleObject (rotated, filled)
   Dim rectangleObject As New AnnRectangleObject()
   rectangleObject.Stroke.Stroke = AnnSolidColorBrush.Create("red")
   rectangleObject.Fill = AnnSolidColorBrush.Create("blue")
   rectangleObject.Points.Add(GetLeadPointD(100, 100))
   rectangleObject.Points.Add(GetLeadPointD(200, 100))
   rectangleObject.Points.Add(GetLeadPointD(200, 200))
   rectangleObject.Points.Add(GetLeadPointD(100, 200))
   rectangleObject.Rotate(45.0, GetLeadPointD(150, 150))
   ' Create a pointer object
   Dim pointerObject As New AnnPointerObject()
   pointerObject.Stroke.Stroke = AnnSolidColorBrush.Create("red")
   pointerObject.Points.Clear()
   pointerObject.Points.Add(GetLeadPointD(300, 100))
   pointerObject.Points.Add(GetLeadPointD(400, 200))
   pointerObject.PointerPosition = AnnPointerPosition.End

   ' Create a ruler object
   Dim polyRulerObject As New AnnPolyRulerObject()
   polyRulerObject.Stroke.Stroke = AnnSolidColorBrush.Create("green")
   polyRulerObject.Points.Add(GetLeadPointD(100, 300))
   polyRulerObject.Points.Add(GetLeadPointD(200, 400))
   polyRulerObject.Points.Add(GetLeadPointD(300, 300))

   ' Add them to the AnnContainer
   Dim annContainer As New AnnContainer()
   annContainer.Mapper = New AnnContainerMapper(96, 96, 96, 96)
   annContainer.Children.Add(rectangleObject)
   annContainer.Children.Add(pointerObject)
   annContainer.Children.Add(polyRulerObject)

   ' Create a DicomDataSet
   Dim dsPS As New DicomDataSet()
   dsPS.Initialize(DicomClassType.GrayscaleSoftcopyPresentationState, DicomDataSetInitializeFlags.AddMandatoryModulesOnly Or DicomDataSetInitializeFlags.AddMandatoryElementsOnly)

   ' Delete the empty referenced Series Sequence
   Dim referencedSeriesSequence As DicomElement = dsPS.FindFirstElement(Nothing, DicomTag.ReferencedSeriesSequence, True)
   If referencedSeriesSequence IsNot Nothing Then
      dsPS.DeleteElement(referencedSeriesSequence)
   End If

   ' Add a new Referenced Series Sequence
   dsPS.AddPresentationStateImageReference(dsImage, Nothing, 0)

   ' Set up the DicomAnnotationsUtilities converter
   Dim du As New DicomAnnotationsUtilities()
   du.ContainerMapper = annContainer.Mapper
   du.DefaultObject = New DicomTextObject()
   du.ImageDpiX = 96.0
   du.ImageDpiY = 96.0
   du.DisplayWidth = 200
   du.DisplayHeight = 200
   du.LayerName = "Layer 0"

   AddHandler du.OnIncrementGraphicGroupId, AddressOf du_OnIncrementGraphicGroupId
   AddHandler du.OnIncrementCompoundGraphicInstanceId, AddressOf du_OnIncrementCompoundGraphicInstanceId


   ' Convert LEAD annotations to DICOM annotations
   Dim graphicAnnSequenceItem As DicomElement = du.FromAnnContainerToDataSet(dsPS, annContainer)

   ' Save the presentation state
   dsPS.Save(outfilePresentationState, DicomDataSetSaveFlags.None)

   ' Now you can convert the presentation state dataset back to an AnnContainer
   Dim annContainerNew As AnnContainer = du.FromDataSetToAnnContainer(dsPS, graphicAnnSequenceItem)

   ' There should be three objects
   Debug.Assert(annContainerNew.Children.Count = 3)

   MessageBox.Show("Presentation State Saved: " & outfilePresentationState)
End Sub

Private Function GetLeadPointD(ByVal x As Double, ByVal y As Double) As LeadPointD
   Dim imageDpi As Double = 96.0
   Return New LeadPointD(x * 720.0 / imageDpi, y * 720.0 / imageDpi)
End Function

' Override the default behavior of IncrementGraphicGroupId
Private Sub du_OnIncrementGraphicGroupId(ByVal sender As Object, ByVal e As EventArgs)
   Dim du As DicomAnnotationsUtilities = TryCast(sender, DicomAnnotationsUtilities)
   If du IsNot Nothing Then
      du.GraphicGroupId = du.GraphicGroupId + 2
   End If
End Sub

' Override the default behavior of IncrementGraphicInstanceId
Private Sub du_OnIncrementCompoundGraphicInstanceId(ByVal sender As Object, ByVal e As EventArgs)
   Dim du As DicomAnnotationsUtilities = TryCast(sender, DicomAnnotationsUtilities)
   If du IsNot Nothing Then
      du.CompoundGraphicInstanceId = du.CompoundGraphicInstanceId + 10
   End If
End Sub

            

   

     

            
using Leadtools;
using Leadtools.Dicom;
using Leadtools.Dicom.Annotations.Core;
using Leadtools.Annotations.Core;

private void DicomAnnotationsUtilities_FromAnnContainerToDataSet(DicomDataSet dsImage, string outfilePresentationState)
{
  // Create an AnnRectangleObject (rotated, filled)
  AnnRectangleObject rectangleObject = new AnnRectangleObject();
  rectangleObject.Stroke.Stroke = AnnSolidColorBrush.Create("red");
  rectangleObject.Fill = AnnSolidColorBrush.Create("blue");
  rectangleObject.Points.Add(GetLeadPointD(100,100));
  rectangleObject.Points.Add(GetLeadPointD(200,100));
  rectangleObject.Points.Add(GetLeadPointD(200,200));
  rectangleObject.Points.Add(GetLeadPointD(100,200));
  rectangleObject.Rotate(45.0, GetLeadPointD(150,150));
  // Create a pointer object
  AnnPointerObject pointerObject = new AnnPointerObject();
  pointerObject.Stroke.Stroke = AnnSolidColorBrush.Create("red");
  pointerObject.Points.Clear();
  pointerObject.Points.Add(GetLeadPointD(300, 100));
  pointerObject.Points.Add(GetLeadPointD(400,200));
  pointerObject.PointerPosition = AnnPointerPosition.End;

  // Create a ruler object
  AnnPolyRulerObject polyRulerObject = new AnnPolyRulerObject();
  polyRulerObject.Stroke.Stroke = AnnSolidColorBrush.Create("green");
  polyRulerObject.Points.Add(GetLeadPointD(100, 300));
  polyRulerObject.Points.Add(GetLeadPointD(200,400));
  polyRulerObject.Points.Add(GetLeadPointD(300,300));

  // Add them to the AnnContainer
  AnnContainer annContainer = new AnnContainer();
  annContainer.Mapper = new AnnContainerMapper(96, 96, 96, 96);
  annContainer.Children.Add(rectangleObject);
  annContainer.Children.Add(pointerObject);
  annContainer.Children.Add(polyRulerObject);

  // Create a DicomDataSet
  DicomDataSet dsPS = new DicomDataSet();
  dsPS.Initialize(DicomClassType.GrayscaleSoftcopyPresentationState, DicomDataSetInitializeFlags.AddMandatoryModulesOnly | DicomDataSetInitializeFlags.AddMandatoryElementsOnly);

  // Delete the empty referenced Series Sequence
  DicomElement referencedSeriesSequence = dsPS.FindFirstElement(null, DicomTag.ReferencedSeriesSequence, true);
  if (referencedSeriesSequence != null)
  {
     dsPS.DeleteElement(referencedSeriesSequence);
  }

  // Add a new Referenced Series Sequence
  dsPS.AddPresentationStateImageReference(dsImage, null, 0);

  // Set up the DicomAnnotationsUtilities converter
  DicomAnnotationsUtilities du = new DicomAnnotationsUtilities();
  du.ContainerMapper = annContainer.Mapper;
  du.DefaultObject = new DicomTextObject();
  du.ImageDpiX = 96.0;
  du.ImageDpiY = 96.0;
  du.DisplayWidth = 200;
  du.DisplayHeight = 200;
  du.LayerName = "Layer 0";

  du.OnIncrementGraphicGroupId += new EventHandler(du_OnIncrementGraphicGroupId);
  du.OnIncrementCompoundGraphicInstanceId += new EventHandler(du_OnIncrementCompoundGraphicInstanceId);


  // Convert LEAD annotations to DICOM annotations
  DicomElement graphicAnnSequenceItem = du.FromAnnContainerToDataSet(dsPS, annContainer);

  // Save the presentation state
  dsPS.Save(outfilePresentationState, DicomDataSetSaveFlags.None);

  // Now you can convert the presentation state dataset back to an AnnContainer
  AnnContainer annContainerNew = du.FromDataSetToAnnContainer(dsPS, graphicAnnSequenceItem);

  // There should be three objects
  Debug.Assert(annContainerNew.Children.Count == 3);

  MessageBox.Show("Presentation State Saved: " + outfilePresentationState);
}

LeadPointD GetLeadPointD(double x, double y)
{
   double imageDpi = 96.0;
   return new LeadPointD(x * 720.0 / imageDpi , y * 720.0 / imageDpi );
}

// Override the default behavior of IncrementGraphicGroupId
void du_OnIncrementGraphicGroupId(object sender, EventArgs e)
{
   DicomAnnotationsUtilities du = sender as DicomAnnotationsUtilities;
   if (du != null)
   {
      du.GraphicGroupId = du.GraphicGroupId + 2;
   }
}

// Override the default behavior of IncrementGraphicInstanceId
void du_OnIncrementCompoundGraphicInstanceId(object sender, EventArgs e)
{
   DicomAnnotationsUtilities du = sender as DicomAnnotationsUtilities;
   if (du != null)
   {
      du.CompoundGraphicInstanceId = du.CompoundGraphicInstanceId + 10;
   }
}

            

   

      
	
      
	
    

            
            
Requirements
Target Platforms

            
            
See Also
Reference
DicomAnnotationsUtilities Class

DicomAnnotationsUtilities Members

Overload List




        
    

	
    

	Error processing SSI file


   

    
	

  
Leadtools.Dicom.Annotations.Core requires a Medical toolkit license and unlock key. For more information, refer to: LEADTOOLS Toolkit Features