IsUnoStruct Function
Devolve verdadeiro se o obxecto é unha estrutura Uno.
Sintaxe:
IsUnoStruct( tipo de Uno )
Valor de retorno:
Bool
Parámetros:
Uno type : un ObxectoUno.
Exemplo:
Sub Main
Dim bIsStruct
' Crear unha instancia para un servizo
Dim oSimpleFileAccess
oSimpleFileAccess = CreateUnoService( "com.sun.star.ucb.SimpleFileAccess" )
bIsStruct = IsUnoStruct( oSimpleFileAccess )
MsgBox bIsStruct ' Mostra False porque oSimpleFileAccess non é unha estrutura
' Crear unha instancia para unha estrutura Property
Dim aProperty As New com.sun.star.beans.Property
bIsStruct = IsUnoStruct( aProperty )
MsgBox bIsStruct ' Mostra True porque aProperty é unha estrutura
bIsStruct = IsUnoStruct( 42 )
MsgBox bIsStruct ' Mostra False porque 42 non é unha estrutura
End Sub