Hi Pritpal,
METHOD lbClick( xParam ) CLASS WvgCrt
if hb_isNil( xParam ) .or. hb_isBlock( xParam )
::sl_lbClick := xParam
RETURN NIL
Should be: RETURN ::sl_lbClick
endif
if hb_isArray( xParam ) .and. hb_isBlock( ::sl_lbClick )
eval( ::sl_lbClick, xParam, NIL, Self )
endif
RETURN Self
Should also be: RETURN ::sl_lbClick
As this way suggests that there will ever be parameter checking
when either executing or assigning, will not it affects the overall
performance given the fact that such code will be executed
hundreds of time within short span of program execution.
This is only one method, there are more than a dozens like that.
All the help is appreciated.
Pls explore source/tget.prg, there you can find examples
for both this method and ACCESS/ASSIGN method. Latter can
help on performance.
Brgds,
Viktor
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
