Initializes a new instance of the
QueryClient class.
Syntax
| Visual Basic (Declaration) | |
|---|
Public Function New( _
ByVal clientInfo As AeInfo _
) |
| Visual Basic (Usage) |  Copy Code |
|---|
Dim clientInfo As AeInfo
Dim instance As QueryClient(clientInfo)
|
Parameters
- clientInfo
-
The AeInfo for the calling client.
Example
| Visual Basic | Copy Code |
|---|
<Test> _
Public Sub DatabaseQueryLocal()
Leadtools.Examples.Support.Unlock()
Dim clientInfo As AeInfo = New AeInfo ()
clientInfo.Address = Dns.GetHostName()
clientInfo.AETitle = "TEST_CLIENT"
clientInfo.Port = 1000
Dim client As DbQueryClient = New DbQueryClient (clientInfo)
client.EnableLog = True
client.LogFileName = ("c:\DicomLog.txt")
PerformClientQuery (client)
End Sub
Public Sub PerformClientQuery(ByVal client As QueryClient)
Dim studiesQuery As FindQuery = New FindQuery ()
Dim studies As ClientQueryDataSet = client.FindStudies (studiesQuery)
If studies.Studies.Count > 0 Then
Dim study As ClientQueryDataSet.StudiesRow = studies.Studies (0)
Dim seriesQuery As FindQuery = New FindQuery()
seriesQuery.StudyInstanceUID = study.StudyInstanceUID
Dim series As ClientQueryDataSet = client.FindSeries (seriesQuery)
For Each seriesRow As ClientQueryDataSet.SeriesRow In series.Series
Dim imagesQuery As FindQuery = New FindQuery ()
imagesQuery.SeriesInstanceUID = seriesRow.SeriesInstanceUID
Dim images As ClientQueryDataSet = client.FindImages (imagesQuery)
For Each image As ClientQueryDataSet.ImagesRow In images.Images
Console.WriteLine ("SOPInstanceUID: {0}", image.SOPInstanceUID)
If (Not image.IsSeriesInstanceUIDNull ()) Then
Console.WriteLine("SeriesInstanceUID: {0}", image.SeriesInstanceUID)
End If
If (Not image.IsStudyInstanceUIDNull ()) Then
Console.WriteLine("StudyInstanceUID: {0}", image.StudyInstanceUID)
End If
Next image
Next seriesRow
End If
End Sub |
| C# | Copy Code |
|---|
public void DatabaseQueryLocal()
{
Leadtools.Examples.Support.Unlock();
AeInfo clientInfo = new AeInfo ( );
clientInfo.Address = Dns.GetHostName(); //local machine
clientInfo.AETitle = "TEST_CLIENT" ;
clientInfo.Port = 1000 ;
//Make sure that the FindAddIn is configured properly before using this class.
DbQueryClient client = new DbQueryClient ( clientInfo ) ;
client.EnableLog = true;
client.LogFileName = ( @"c:\DicomLog.txt" ) ;
PerformClientQuery ( client ) ;
}
public void PerformClientQuery ( QueryClient client )
{
FindQuery studiesQuery = new FindQuery ( ) ;
ClientQueryDataSet studies = client.FindStudies ( studiesQuery ) ;
if ( studies.Studies.Count > 0 )
{
ClientQueryDataSet.StudiesRow study = studies.Studies [ 0 ] ;
FindQuery seriesQuery = new FindQuery();
seriesQuery.StudyInstanceUID = study.StudyInstanceUID ;
ClientQueryDataSet series = client.FindSeries ( seriesQuery ) ;
foreach ( ClientQueryDataSet.SeriesRow seriesRow in series.Series )
{
FindQuery imagesQuery = new FindQuery ( ) ;
imagesQuery.SeriesInstanceUID = seriesRow.SeriesInstanceUID ;
ClientQueryDataSet images = client.FindImages ( imagesQuery ) ;
foreach ( ClientQueryDataSet.ImagesRow image in images.Images )
{
Console.WriteLine ( "SOPInstanceUID: {0}", image.SOPInstanceUID ) ;
if ( !image.IsSeriesInstanceUIDNull ( ) )
{
Console.WriteLine("SeriesInstanceUID: {0}", image.SeriesInstanceUID);
}
if ( !image.IsStudyInstanceUIDNull ( ) )
{
Console.WriteLine("StudyInstanceUID: {0}", image.StudyInstanceUID);
}
}
}
}
} |
Requirements
Target Platforms: Microsoft .NET Framework 3.0, Windows XP, Windows Server 2003 family, Windows Server 2008 family
See Also
