Object (data type)| CIMPLICITY 2022 Documentation

Syntax	Object
Description	A data type used to declare OLE automation variables.
Comments	The Object type is used to declare variables that reference objects within an application using OLE automation. Each object is a 4-byte (32-bit) value that references the object internally. The value 0 (or Nothing ) indicates that the variable does not reference a valid object, as is the case when the object has not yet been given a value. Accessing properties or methods of such Object variables generates a runtime error.
	Using Objects Object variables are declared using the Dim, Public, or Private statement: `Dim MyApp As Object` Object variables can be assigned values (thereby referencing a real physical object) using the Set statement: `Set MyApp = CreateObject("phantom.application") Set MyApp = Nothing` Properties of an Object are accessed using the dot (.) separator: `MyApp.Color = 10 i% = MyApp.Color` Methods of an Object are also accessed using the dot (.) separator: `MyApp.Open "sample.txt" isSuccess = MyApp.Save("new.txt",15)`
	Automatic Destruction The Basic Control Engine keeps track of the number of variables that reference a given object so that the object can be destroyed when there are no longer any references to it: `Sub Main() 'Number of references to object Dim a As Object '0 Dim b As Object '0 Set a = CreateObject("phantom.application) '1 Set b = a '2 Set a = Nothing '1 End Sub '0 (object destroyed)` Note An OLE automation object is instructed by the Basic Control Engine to destroy itself when no variables reference that object. However, it is the responsibility of the OLE automation server to destroy it. Some servers do not destroy their objects—usually when the objects have a visual component and can be destroyed manually by the user.
See Also	Currency (data type); Date (data type); Double (data type); Integer (data type); Long (data type); Single (data type); String (data type); Variant (data type); Boolean (data type); DefType (statement).

Syntax

Object

Description

A data type used to declare OLE automation variables.

Comments

The Object type is used to declare variables that reference objects within an application using OLE automation. Each object is a 4-byte (32-bit) value that references the object internally. The value 0 (or Nothing ) indicates that the variable does not reference a valid object, as is the case when the object has not yet been given a value. Accessing properties or methods of such Object variables generates a runtime error.

Using Objects Object variables are declared using the Dim, Public, or Private statement:

  Dim MyApp As Object

Object variables can be assigned values (thereby referencing a real physical object) using the Set statement:

  Set MyApp = CreateObject("phantom.application")
  Set MyApp = Nothing

Properties of an Object are accessed using the dot (.) separator:

  MyApp.Color = 10
  i% = MyApp.Color

Methods of an Object are also accessed using the dot (.) separator:

  MyApp.Open "sample.txt"
  isSuccess = MyApp.Save("new.txt",15)

Automatic Destruction The Basic Control Engine keeps track of the number of variables that reference a given object so that the object can be destroyed when there are no longer any references to it:

  Sub Main()               'Number of references to object
    Dim a As Object                 '0
    Dim b As Object                 '0
    Set a = CreateObject("phantom.application)  '1
    Set b = a                        '2
    Set a = Nothing                  '1
  End Sub                            '0 (object destroyed)

Note An OLE automation object is instructed by the Basic Control Engine to destroy itself when no variables reference that object. However, it is the responsibility of the OLE automation server to destroy it. Some servers do not destroy their objects—usually when the objects have a visual component and can be destroyed manually by the user.