__OBJADDINLINE()

Add an INLINE to an already existing class

Syntax

__objAddInline( <oObject>, <cInlineName>, <bInline> ) --> oObject

Arguments

<oObject> is the object to work on.

<cInlineName> is the symbol name of the new INLINE to add.

<bInline> is a code block to associate with the INLINE method.

Returns

__objAddInline() return a reference to <oObject>.

Description

__objAddInline() is a low level class support function that add a new INLINE method to an object. is unchanged if a symbol with the name already exist in .

Examples

// create a new THappy class and add a Smile INLINE method
oHappy := TClass():New( "THappy" )
bInline := { | nType | { ":)", ";)", "*SMILE*" }[ nType ] }
__objAddInline( oHappy, "Smile", bInline )
? oHappy:Smile( 1 ) // :)
? oHappy:Smile( 2 ) // ;)
? oHappy:Smile( 3 ) // *SMILE*

Status

Ready

Compliance

__objAddInline() is a Harbour extension.

Files

Library is rtl

See Also