Returns the
Private Creator Data Element that matches the search constraints.
Supported in Silverlight, Windows Phone 7.
Syntax
Parameters
- element
- A DicomElement in the data set. The search for Private Creator Data Elements will be at the same level as as this item.
- tree
- true to evaluate the Data Set as a tree; false to evaluate the Data Set as a list.
- idCode
- String identifier that is assigned to the private creator data element. If non-null, search includes only those Private Creator Data Elements that have a string value that is the same as idCode. If null, search includes Private Creator Data Elements with any string value.
- elementGroup
- Group number to search within. If elementGroup is 0, search includes Private Creator Data Elements with any group. If elementGroup is 0x0010 to 0x00FF, the search includes only those Private Creator Data Elements in elementGroup.
Return Value
The first
Private Creator Data Element that matches the search constraints. If null is returned, no item exists with the specified search constraints.
Example
This example displays all the Private Creator Data Elements and corresponding private elements in a data set.
| Visual Basic |  Copy Code |
|---|
Private Function DumpElement(ByVal p As DicomElement) As String
If p Is Nothing Then
Return String.Empty
End If
Return String.Format("({0:X4},{1:X4})" & Constants.vbLf, p.Tag >> &H10, p.Tag And &HFFFF)
End Function
Private Function DumpPrivateElements(ByVal ds As DicomDataSet, ByVal privateCreatorDataElement As DicomElement) As String
Dim sMsg As String = String.Empty
Dim p As DicomElement = ds.FindFirstPrivateElement(privateCreatorDataElement)
Do While Not p Is Nothing
sMsg = sMsg & Constants.vbTab + DumpElement(p)
p = ds.FindNextPrivateElement(p, privateCreatorDataElement)
Loop
Return sMsg
End Function
Private Sub DicomDataSet_FindFirstPrivateCreatorDataElementExample(ByVal ds As DicomDataSet, ByVal root As DicomElement, ByVal tree As Boolean)
Dim sMsg As String = String.Empty
Dim pPrivateCreatorDataElement As DicomElement = ds.FindFirstPrivateCreatorDataElement(root, tree, Nothing, 0)
Do While Not pPrivateCreatorDataElement Is Nothing
sMsg = sMsg & "*** Private Creator Data Element" & DumpElement(pPrivateCreatorDataElement)
sMsg = sMsg & DumpPrivateElements(ds, pPrivateCreatorDataElement)
pPrivateCreatorDataElement = ds.FindNextPrivateCreatorDataElement(pPrivateCreatorDataElement, tree, Nothing, 0)
Loop
MessageBox.Show(sMsg.ToString(), "Private Elements", MessageBoxButtons.OK)
End Sub |
| C# | Copy Code |
|---|
string DumpElement(DicomElement p)
{
if (p == null)
return string.Empty;
return string.Format("({0:X4},{1:X4})\n", p.Tag >> 0x10, p.Tag & 0xFFFF);
}
string DumpPrivateElements(DicomDataSet ds, DicomElement privateCreatorDataElement)
{
string sMsg = string.Empty;
DicomElement p = ds.FindFirstPrivateElement(privateCreatorDataElement);
while (p != null)
{
sMsg = sMsg + "\t" + DumpElement(p);
p = ds.FindNextPrivateElement(p, privateCreatorDataElement);
}
return sMsg;
}
void DicomDataSet_FindFirstPrivateCreatorDataElementExample(DicomDataSet ds, DicomElement root, bool tree)
{
string sMsg = string.Empty;
DicomElement pPrivateCreatorDataElement = ds.FindFirstPrivateCreatorDataElement(root, tree, null, 0);
while (pPrivateCreatorDataElement != null)
{
sMsg = sMsg + "*** Private Creator Data Element" + DumpElement(pPrivateCreatorDataElement);
sMsg = sMsg + DumpPrivateElements(ds, pPrivateCreatorDataElement);
pPrivateCreatorDataElement = ds.FindNextPrivateCreatorDataElement(pPrivateCreatorDataElement, tree, null, 0);
}
MessageBox.Show(sMsg.ToString(), "Private Elements", MessageBoxButtons.OK);
} |
| SilverlightCSharp | Copy Code |
|---|
string DumpElement(DicomElement p)
{
if (p == null)
return string.Empty;
return string.Format("({0:X4},{1:X4})\n", p.Tag >> 0x10, p.Tag & 0xFFFF);
}
string DumpPrivateElements(DicomDataSet ds, DicomElement privateCreatorDataElement)
{
string sMsg = string.Empty;
DicomElement p = ds.FindFirstPrivateElement(privateCreatorDataElement);
while (p != null)
{
sMsg = sMsg + "\t" + DumpElement(p);
p = ds.FindNextPrivateElement(p, privateCreatorDataElement);
}
return sMsg;
}
void DicomDataSet_FindFirstPrivateCreatorDataElementExample(DicomDataSet ds, DicomElement root, bool tree)
{
string sMsg = string.Empty;
DicomElement pPrivateCreatorDataElement = ds.FindFirstPrivateCreatorDataElement(root, tree, null, 0);
while (pPrivateCreatorDataElement != null)
{
sMsg = sMsg + "*** Private Creator Data Element" + DumpElement(pPrivateCreatorDataElement);
sMsg = sMsg + DumpPrivateElements(ds, pPrivateCreatorDataElement);
pPrivateCreatorDataElement = ds.FindNextPrivateCreatorDataElement(pPrivateCreatorDataElement, tree, null, 0);
}
Debug.WriteLine("Private Elements: " + sMsg.ToString());
} |
| SilverlightVB | Copy Code |
|---|
Private Function DumpElement(ByVal p As DicomElement) As String
If p Is Nothing Then
Return String.Empty
End If
Return String.Format("({0:X4},{1:X4})" & Constants.vbLf, p.Tag >> &H10, p.Tag And &HFFFF)
End Function
Private Function DumpPrivateElements(ByVal ds As DicomDataSet, ByVal privateCreatorDataElement As DicomElement) As String
Dim sMsg As String = String.Empty
Dim p As DicomElement = ds.FindFirstPrivateElement(privateCreatorDataElement)
Do While Not p Is Nothing
sMsg = sMsg & Constants.vbTab + DumpElement(p)
p = ds.FindNextPrivateElement(p, privateCreatorDataElement)
Loop
Return sMsg
End Function
Private Sub DicomDataSet_FindFirstPrivateCreatorDataElementExample(ByVal ds As DicomDataSet, ByVal root As DicomElement, ByVal tree As Boolean)
Dim sMsg As String = String.Empty
Dim pPrivateCreatorDataElement As DicomElement = ds.FindFirstPrivateCreatorDataElement(root, tree, Nothing, 0)
Do While Not pPrivateCreatorDataElement Is Nothing
sMsg = sMsg & "*** Private Creator Data Element" & DumpElement(pPrivateCreatorDataElement)
sMsg = sMsg & DumpPrivateElements(ds, pPrivateCreatorDataElement)
pPrivateCreatorDataElement = ds.FindNextPrivateCreatorDataElement(pPrivateCreatorDataElement, tree, Nothing, 0)
Loop
Debug.WriteLine("Private Elements: " & sMsg.ToString())
End Sub |
Remarks
Requirements
Target Platforms: Silverlight 3.0, Windows XP, Windows Server 2003 family, Windows Server 2008 family, Windows Vista, Windows 7, MAC OS/X (Intel Only)
See Also
