Funkcja HasUnoInterfaces

Sprawdza, czy obiekt UNO Basic obsługuje określone interfejsy UNO.

Zwraca wartość True (prawda), jeśli wszystkie podane interfejsy Uno są obsługiwane, w przeciwnym razie zwracana jest wartość False (fałsz).

Składnia:

HasUnoInterfaces( oTest, nazwa_interfejsu_Uno1 [, nazwa_interfejsu_Uno2, ...])

Typ zwracany:

Bool

Parametry:

Nazwa

Typ

Opis

oTest

Object

obiekt Basic Uno do testowania.

Nazwa-interfejsu-Uno 1,
Nazwa-interfejsu-Uno 2, ...

String

Nazwy interfejsów Uno


Przykład:


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

Prosimy o wsparcie!