IVarGetCreateInstanceArgs
(Available in 01 TS COM - TS_COM_DelegateIDispatch)
Purpose
Get a property value as object
Syntax
oObject:=oDelegateIDispatch:IVarGetCreateInstanceArgs( #MyObject, #Item ; ...
..., { 1 } )
Arguments
symClass
|
SYMBOL
|
symIVar
|
SYMBOL
|
aArgs
|
ARRAY
|
Description
Get a property value as object, The method 'IVarGetArgs' could be used to return the same value, except the this method will instanciate a object of the specified class ( 'symClass' ). For the same property the 'IVarGetArgs' method will return an instance of 'TS_DelegateIDispatch'
Returns
OBJECT, Property value
Example
ACCESS CAItem CLASS SomeClass
RETURN SELF:IVarGetCreateInstanceArgs( #ItemObject, #Item, { ; ...
...1 } )
Source
METHOD IVarGetCreateInstanceArgs( symClass AS SYMBOL, symIVar AS SYMBOL, aArgs AS ; ...
...ARRAY ) CLASS TS_DelegateIDispatch
LOCAL uRetVal AS USUAL
TSTrace Enter symIVar
IF SELF:FInit
DO CASE
CASE Empty( symClass )
uRetVal:=SELF:_IVarGet( NULL_SYMBOL, symIVar, aArgs, ; ...
... SELF:_ArgsLength( aArgs ) )
CASE IsClass( symClass )
uRetVal:=SELF:_IVarGet( symClass