In This Topic ▼

IsChanged Method

Summary

Determines whether this instance has changed.

Syntax

C++

public bool IsChanged()

Public Function IsChanged() As Boolean

public: 
bool IsChanged();

Return Value

true if this instance is changed; otherwise, false.

Example

This example compares two datasets with different patient IDs.

using Leadtools.Dicom.Common.Anonymization; 
using Leadtools.Dicom; 
using Leadtools.Dicom.Common.Compare; 
 
public void CompareSample() 
{ 
   string dicomFileNameIn = Path.Combine(LEAD_VARS.ImagesDir, "IMAGE3.dcm"); 
 
   using (DicomDataSet dataset1 = new DicomDataSet()) 
   { 
      dataset1.Load(dicomFileNameIn, DicomDataSetLoadFlags.None); 
      using (DicomDataSet dataset2 = new DicomDataSet()) 
      { 
         List<Difference> differences = null; 
 
         dataset2.Copy(dataset2, null, null); 
         // 
         // Set a different value for patient id 
         // 
 
         dataset2.InsertElementAndSetValue(DicomTag.PatientID, "DifferentValue"); 
         differences = dataset1.Compare(dataset2); 
         foreach (Difference difference in differences) 
         { 
            if (difference.IsChanged()) 
            { 
               string info = string.Format("{0} has changed from {1} to {2}.", difference.Name, difference.FirstValue, difference.SecondValue); 
 
               Console.WriteLine(info); 
               Console.WriteLine("Html Diff"); 
               Console.WriteLine("\t{0}", difference.HtmlDiff); 
            } 
         } 
      } 
   } 
} 
 
 
static class LEAD_VARS 
{ 
   public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images"; 
}

Imports Leadtools.Dicom.Common.Anonymization 
Imports Leadtools.Dicom 
Imports Leadtools.Dicom.Common.Compare 
 
Public Sub CompareSample() 
   Dim dicomFileNameIn As String = Path.Combine(LEAD_VARS.ImagesDir, "IMAGE3.dcm") 
 
   Using dataset1 As New DicomDataSet() 
      dataset1.Load(dicomFileNameIn, DicomDataSetLoadFlags.None) 
      Using dataset2 As New DicomDataSet() 
         Dim differences As List(Of Difference) = Nothing 
 
         dataset2.Copy(dataset2, Nothing, Nothing) 
         ' 
         ' Set a different value for patient id 
         ' 
         dataset2.InsertElementAndSetValue(DicomTag.PatientID, "DifferentValue") 
         differences = dataset1.Compare(dataset2) 
         For Each difference As Difference In differences 
            If difference.IsChanged() Then 
               Dim info As String = String.Format("{0} has changed from {1} to {2}.", difference.Name, difference.FirstValue, difference.SecondValue) 
 
               Console.WriteLine(info) 
               Console.WriteLine("Html Diff") 
               Console.WriteLine(vbTab & "{0}", difference.HtmlDiff) 
            End If 
         Next 
      End Using 
   End Using 
End Sub 
 
 
Public NotInheritable Class LEAD_VARS 
   Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images" 
End Class