Object: Display

Object: Display

The Display object provides the methods and properties of the DIAdem NAVIGATOR interface. You can use the object Display for the DataFinder and for data stores.

The following example determines the current search object. If the example runs a quick search, the example displays the search text:

Dim oMyCurrDataProvider, oMyQuery
Set oMyCurrDataProvider = Navigator.Display.CurrDataFinder
Set oMyQuery = oMyCurrDataProvider.QueryForm.GetCurrQuery
If (oMyQuery.IsKindOf(eTextQuery)) Then
   Call MsgBoxDisp(oMyQuery.Text)
Else
   Call MsgBoxDisp("Advanced Query")
End If

oMyCurrDataProvider = dd.Navigator.Display.CurrDataFinder 
oMyQuery = oMyCurrDataProvider.QueryForm.GetCurrQuery() 
if (oMyQuery.IsKindOf(dd.eTextQuery)) : 
    dd.MsgBoxDisp(oMyQuery.Text) 
else: 
    dd.MsgBoxDisp("Advanced Query") 

Note In addition to the properties CurrDataFinder and CurrDataStore of the Display object, there is the property CurrDataProvider, which returns the CurrDataProvider object. Use CurrDataProvider if it is not clear which object it is. Use the IsKindOf method to specify the object type.