Hi Cor;

the only thing to check the visibility of a control I could figure out was the AccessibleStateType which holds values for certain states.

One of them is the constant VISIBLE with the value 30.

After all this code works for me:

Dim bVisible As Boolean
a() = oControl.AccessibleContext.AccessibleStateSet.States
For i = 0 To UBound(a())
        If a(i) = 30 Then
                bVisible = True
                Exit For
        End If
Next i
MsgBox bVisible


Hope that helps
Christoph



Cor Nouws schrieb:

Cor Nouws wrote:
I know how to set the visible state of a control:
Possibly not unimportant: the control is a textbox.


    oControlModel = oDocDlg.GetControl(sName)
    oControlModel.setVisible (sYesNo)

but cannot find a methode (with xRay / API IDL) to check if a control is visible ...




---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to