IBM Lotus Symphony


IsUnoStruct-Funktion [Laufzeit]

Gibt True zurück, wenn es sich bei dem Objekt um ein UnoStruct handelt.

Syntax:

IsUnoStruct( Uno-Typ )

Rückgabewert:

Bool

Parameter:

Uno-Typ: Ein UnoObject

Beispiel:

Sub Main

Dim bIsStruct

' Instanziieren eines Services

Dim oSimpleFileAccess

oSimpleFileAccess = CreateUnoService( "com.sun.star.ucb.SimpleFileAccess" )

bIsStruct = IsUnoStruct( oSimpleFileAccess )

MsgBox bIsStruct ' Zeigt False an, da oSimpleFileAccess NICHT vom Typ "Struct" ist

' Instanziieren einer Eigenschaftenstruktur

Dim aProperty As New com.sun.star.beans.Property

bIsStruct = IsUnoStruct( aProperty )

MsgBox bIsStruct ' Zeigt True an, da aProperty vom Typ "Struct" ist

bIsStruct = IsUnoStruct( 42 )

MsgBox bIsStruct ' Zeigt False an, da 42 NICHT vom Typ "Struct" ist

End Sub


Produktfeedback | Zusätzliche Dokumentation | Marken