IVarGet

 (Available in 01 TS COM - TS_COM_DelegateIDispatch)

Purpose

Get a property value

Syntax

oObject:=oDelegateIDispatch:IVarGetArgs( #Item )

Arguments

symIVar
SYMBOL

Description

Get a property value will return any properties value. When the property get method does need parameters the 'IVarGetArgs()' method should be used.

Returns

USUAL, Property value

Example

ACCESS CAItem CLASS SomeClass
RETURN SELF:IVarGet( #Item )

Source

METHOD IVarGet( symIVar AS SYMBOL ) AS USUAL PASCAL CLASS TS_DelegateIDispatch
LOCAL uRetVal AS USUAL
   TSTrace Enter symIVar
   IF SELF:FInit
      uRetVal:=SELF:_IVarGet( NULL_SYMBOL, symIVar, NULL_ARRAY ; ...
     ... , 0U )
   ELSE
      TSTrace Warning "!SELF:FInit"
      uRetVal:=NIL
   END
   TSTrace Leave symIVar
RETURN uRetVal