Functions.IVarGetSelf 方法 |
命名空间: XSharp.RT
FUNCTION IVarGetSelf( oObject AS Object, symInstanceVar AS STRING ) AS USUAL
public static __Usual IVarGetSelf( Object oObject, string symInstanceVar )
1CLASS GetVars 2 EXPORT cName 3 INSTANCE cPhone 4 PROTECT cID 5 HIDDEN cPassWord 6CONSTRUCTOR CLASS GetVars 7 cName := "Adam" 8 cPhone := "4460" 9END CLASS 10 11FUNCTION Start() 12 LOCAL oVars AS OBJECT 13 oVars := GetVars{} 14 ? IVarGetSelf(oVars, #cName) // Adam 15 ? IVarGetSelf(oVars, #cPhone) // 4460