HasUnoInterfaces-funktion

Tester om et Basic UNO-objekt understøtter bestemte Uno-interfaces.

Returnerer sand, hvis alle oplyste Uno-interfaces er understøttede, ellers returneres falsk.

Syntaks:

HasUnoInterfaces( oTest, UNO-interfacenavn 1 [, UNO-interfacenavn 2, ...])

Returtype

Bool

Parametre:

Navn

Type

Beskrivelse

oTest

Object

Basic Uno-objektet, som du vil teste.

Uno-grænsefladenavn 1,
Uno-grænsefladenavn 2, ...

String

Uno-grænsefladenavn(e)


Eksempel:


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

Støt os venligst!