Funkce HasUnoInterfaces

Testuje, zda objekt Basic Uno podporuje určitá rozhraní Uno.

Vrátí True, pokud jsou podporována všechna uvedená Uno rozhraní, jinak vrátí False.

Syntaxe:

HasUnoInterfaces( oTest, Uno-Interface-Name 1 [, Uno-Interface-Name 2, ...])

Návratový typ:

Bool

Parametry:

Název

Typ

Popis

oTest

Object

Basic Uno objekt , který chcete otestovat.

Uno-Interface-Name 1,
Uno-Interface-Name 2, ...

String

Názvy rozhraní UNO


Příklad:


Sub HasInterface
    Dim bHas as Boolean
    Dim oSheet as Object
    oSheet = ThisComponent.Sheets(0) 
    bHas = HasUnoInterfaces( oSheet, "com.sun.star.beans.XIntrospection" )
    Print bHas ' = True
End Sub

Podpořte nás!