Съдържание

# Функция EqualUnoObjects

Връща True, ако двете зададени променливи на Basic представят един и същ екземпляр на обект на Uno.

### Синтаксис:

EqualUnoObjects(oObj1, oObj2)

### Тип на резултата:

Bool

### Параметри:

Име | Тип | Описание
--- | --- | ---
oObj1 | Object | the first Basic Uno object.
oObj2 | Object | the second Basic Uno object.

### Пример:

Примерният код по-долу връща True, защото oDoc и ThisComponent сочат към един и същ обект:

        Dim oDoc as Object
        oDoc = ThisComponent
        MsgBox EqualUnoObjects(oDoc, ThisComponent) ' True

Примерният код по-долу връща False, защото присвояването създава копие на оригиналния обект. Така Struct1 и Struct2 сочат към различни екземпляри на обекта.

        Dim Struct1 as new com.sun.star.beans.PropertyValue
        Dim Struct2 as Variant
        Struct1.Name = "John"
        Struct2 = Struct1
        MsgBox EqualUnoObjects(Struct1, Struct2) ' False
        Struct2.Name = "Judy"
        MsgBox Struct1.Name ' John
        MsgBox Struct2.Name ' Judy

Теми, свързани с показаната

Функция IsObject

Обекти, функции и услуги на UNO