←Select platform

SetValue Method

Summary

Sets the value(s) of a Data Element. The value can be any supported type.

Syntax
C#
VB
C++
public bool SetValue( 
   DicomElement element, 
   object value 
) 
Public Function SetValue( _ 
   ByVal element As DicomElement, _ 
   ByVal value As Object _ 
) As Boolean 
public: 
bool SetValue(  
   DicomElement^ element, 
   Object^ value 
)  

Parameters

element
An item in the Data Set.

value

An Object that can be any supported type, or an array of any supported type.

Return Value

true if the object value was set successfully. false if could not set the object value of the Data Element.

Remarks

Note: The user is responsible to allocate the memory for value. This is very flexible function that can be used to set the value of almost any DICOM data element, regardless of the DicomVRType The Object can be any of the following:

Example

This example shows how to set the value of various DICOM elements, regardless of the regardless of the DicomVRType or the multiplicity.

C#
VB
using Leadtools; 
using Leadtools.Dicom; 
 
///  
private DicomElement MyInsertElement(DicomDataSet ds, long tag) 
{ 
   DicomTag myTag = DicomTagTable.Instance.Find(tag); 
   DicomElement element = ds.InsertElement(null, false, tag, myTag.VR, false, 0); 
   return element; 
} 
 
private void DicomDataSet_SetValueExample() 
{ 
   DicomElement element = null; 
   DicomDataSet ds = new DicomDataSet(); 
 
   // Set a string 
   element = MyInsertElement(ds, DicomTag.PatientName); 
   ds.SetValue(element, "Joe^Patient"); 
 
   // Set an array of strings 
   element = MyInsertElement(ds, DicomTag.OtherPatientNames); 
   string[] names = { "One", "Two", "Three" }; 
   ds.SetValue(element, names); 
 
   // Another way to do an array of strings 
   List<string> it = new List<string>(); 
   it.Add("ORIGINAL"); 
   it.Add("PRIMARY"); 
   element = MyInsertElement(ds, DicomTag.ImageType); 
   ds.SetValue(element, it.ToArray()); 
 
   // Set an array of integers, that will be converted to strings 
   element = MyInsertElement(ds, DicomTag.PhysicianOfRecord); 
   int[] namesInt = { 1, 2, 3 }; 
   ds.SetValue(element, namesInt); 
 
   // Set a DicomDateValue 
   element = MyInsertElement(ds, DicomTag.PatientBirthDate); 
   DicomDateValue dicomDate = new DicomDateValue(1961, 6, 5); 
   ds.SetValue(element, dicomDate); 
 
   // Set a DateTime 
   element = MyInsertElement(ds, DicomTag.InstanceCreationDate); 
   DateTime dateTime = new DateTime(2003, 5, 16); 
   ds.SetValue(element, dateTime); 
 
   // Set an array of DateTime 
   element = MyInsertElement(ds, DicomTag.DateOfLastCalibration); 
   DateTime[] dateTimeArray = { new DateTime(2000, 3, 8), new DateTime(2003, 5, 16) }; 
   ds.SetValue(element, dateTimeArray); 
 
   ds.Save(Path.Combine(LEAD_VARS.ImagesDir, "test.dcm"), DicomDataSetSaveFlags.None); 
} 
 
static class LEAD_VARS 
{ 
   public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images"; 
} 
Imports Leadtools 
Imports Leadtools.Dicom 
 
'''  
Private Function MyInsertElement(ByVal ds As DicomDataSet, ByVal tag As Long) As DicomElement 
   Dim myTag As DicomTag = DicomTagTable.Instance.Find(tag) 
   Dim element As DicomElement = ds.InsertElement(Nothing, False, tag, myTag.VR, False, 0) 
   Return element 
End Function 
 
Private Sub DicomDataSet_SetValueExample() 
   Dim element As DicomElement = Nothing 
   Dim ds As DicomDataSet = New DicomDataSet() 
 
   ' Set a string 
   element = MyInsertElement(ds, DicomTag.PatientName) 
   ds.SetValue(element, "Joe^Patient") 
 
   ' Set an array of strings 
   element = MyInsertElement(ds, DicomTag.OtherPatientNames) 
   Dim names As String() = {"One", "Two", "Three"} 
   ds.SetValue(element, names) 
 
   ' Another way to do an array of strings 
   Dim it As List(Of String) = New List(Of String)() 
   it.Add("ORIGINAL") 
   it.Add("PRIMARY") 
   element = MyInsertElement(ds, DicomTag.ImageType) 
   ds.SetValue(element, it.ToArray()) 
 
   ' Set an array of integers, that will be converted to strings 
   element = MyInsertElement(ds, DicomTag.PhysicianOfRecord) 
   Dim namesInt As Integer() = {1, 2, 3} 
   ds.SetValue(element, namesInt) 
 
   ' Set a DicomDateValue 
   element = MyInsertElement(ds, DicomTag.PatientBirthDate) 
   Dim dicomDate As DicomDateValue = New DicomDateValue(1961, 6, 5) 
   ds.SetValue(element, dicomDate) 
 
   ' Set a DateTime 
   element = MyInsertElement(ds, DicomTag.InstanceCreationDate) 
   Dim dateTime As DateTime = New DateTime(2003, 5, 16) 
   ds.SetValue(element, dateTime) 
 
   ' Set an array of DateTime 
   element = MyInsertElement(ds, DicomTag.DateOfLastCalibration) 
   Dim dateTimeArray As DateTime() = {New DateTime(2000, 3, 8), New DateTime(2003, 5, 16)} 
   ds.SetValue(element, dateTimeArray) 
 
   ds.Save(Path.Combine(LEAD_VARS.ImagesDir, "test.dcm"), DicomDataSetSaveFlags.None) 
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; 
 
private DicomElement MyInsertElement(DicomDataSet ds, long tag) 
{ 
   DicomTag myTag = DicomTagTable.Instance.Find(tag); 
   DicomElement element = ds.InsertElement(null, false, tag, myTag.VR, false, 0); 
   return element; 
} 
 
private void DicomDataSet_SetValueExample(Stream outputStream) 
{ 
   DicomElement element = null; 
   DicomDataSet ds = new DicomDataSet(); 
 
   // Set a string 
   element = MyInsertElement(ds, DicomTag.PatientName); 
   ds.SetValue(element, "Joe^Patient"); 
 
   // Set an array of strings 
   element = MyInsertElement(ds, DicomTag.OtherPatientNames); 
   string[] names = { "One", "Two", "Three" }; 
   ds.SetValue(element, names); 
 
   // Another way to do an array of strings 
   List<string> it = new List<string>(); 
   it.Add("ORIGINAL"); 
   it.Add("PRIMARY"); 
   element = MyInsertElement(ds, DicomTag.ImageType); 
   ds.SetValue(element, it.ToArray()); 
 
   // Set an array of integers, that will be converted to strings 
   element = MyInsertElement(ds, DicomTag.PhysicianOfRecord); 
   int[] namesInt = { 1, 2, 3 }; 
   ds.SetValue(element, namesInt); 
 
   // Set a DicomDateValue 
   element = MyInsertElement(ds, DicomTag.PatientBirthDate); 
   DicomDateValue dicomDate = new DicomDateValue(1961, 6, 5); 
   ds.SetValue(element, dicomDate); 
 
   // Set a DateTime 
   element = MyInsertElement(ds, DicomTag.InstanceCreationDate); 
   DateTime dateTime = new DateTime(2003, 5, 16); 
   ds.SetValue(element, dateTime); 
 
   // Set an array of DateTime 
   element = MyInsertElement(ds, DicomTag.DateOfLastCalibration); 
   DateTime[] dateTimeArray = { new DateTime(2000, 3, 8), new DateTime(2003, 5, 16) }; 
   ds.SetValue(element, dateTimeArray); 
 
   ds.Save(outputStream, DicomDataSetSaveFlags.None); 
} 
vb[Silverlight VB Example] 
Imports Leadtools 
Imports Leadtools.Dicom 
 
Private Function MyInsertElement(ByVal ds As DicomDataSet, ByVal tag As Long) As DicomElement 
   Dim myTag As DicomTag = DicomTagTable.Instance.Find(tag) 
   Dim element As DicomElement = ds.InsertElement(Nothing, False, tag, myTag.VR, False, 0) 
   Return element 
End Function 
 
Private Sub DicomDataSet_SetValueExample(ByVal outputStream As Stream) 
   Dim element As DicomElement = Nothing 
   Dim ds As DicomDataSet = New DicomDataSet() 
 
   ' Set a string 
   element = MyInsertElement(ds, DicomTag.PatientName) 
   ds.SetValue(element, "Joe^Patient") 
 
   ' Set an array of strings 
   element = MyInsertElement(ds, DicomTag.OtherPatientNames) 
   Dim names As String() = {"One", "Two", "Three"} 
   ds.SetValue(element, names) 
 
   ' Another way to do an array of strings 
   Dim it As List(Of String) = New List(Of String)() 
   it.Add("ORIGINAL") 
   it.Add("PRIMARY") 
   element = MyInsertElement(ds, DicomTag.ImageType) 
   ds.SetValue(element, it.ToArray()) 
 
   ' Set an array of integers, that will be converted to strings 
   element = MyInsertElement(ds, DicomTag.PhysicianOfRecord) 
   Dim namesInt As Integer() = {1, 2, 3} 
   ds.SetValue(element, namesInt) 
 
   ' Set a DicomDateValue 
   element = MyInsertElement(ds, DicomTag.PatientBirthDate) 
   Dim dicomDate As DicomDateValue = New DicomDateValue(1961, 6, 5) 
   ds.SetValue(element, dicomDate) 
 
   ' Set a DateTime 
   element = MyInsertElement(ds, DicomTag.InstanceCreationDate) 
   Dim dateTime As DateTime = New DateTime(2003, 5, 16) 
   ds.SetValue(element, dateTime) 
 
   ' Set an array of DateTime 
   element = MyInsertElement(ds, DicomTag.DateOfLastCalibration) 
   Dim dateTimeArray As DateTime() = {New DateTime(2000, 3, 8), New DateTime(2003, 5, 16)} 
   ds.SetValue(element, dateTimeArray) 
 
   ds.Save(outputStream, DicomDataSetSaveFlags.None) 
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