Função HasUnoInterfaces

Testa se um objeto Uno do Basic suporta determinadas interfaces Uno.

Retorna Verdadeiro se houver suporte para todas as interfaces Uno declaradas, do contrário, retorna Falso.

Sintaxe:

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

Tipo de retorno:

Bool

Parâmetros:

Nome	Tipo	Descrição
oTeste	Object	o objeto Uno básico que pretende testar.
Interface-Uno-Nome 1, Interface-Uno-Nome 2, ...	String	Nome(s) da interface Uno

Exemplo:


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

Objetos UNO, funções e serviços