从VFP8开始,公开了两个事件,Access和Assign,前者当读取属性时激发,后者当对属性赋值时激发,其表示形式就是属性名_Access或属性名_Assign的形式。MoverBars是属性,也同样有这样的事件可激发。tlOn是Assign函数的形参,是激发Assign函数时即将赋给属性的值。因为MoverBars是逻辑型变量,所以它应该存取逻辑型值,故命名参数用tl开始,t表示参数,l表示逻辑型,On表示该逻辑型变量应是on/off的,.T.时表示on。
函数中,首先通过IF .RowSourceType <= 1判断,如果条件成立,则接受改变属性(赋值)的行为,允许将.MoverBars赋值为指定的数据,否则给出提示信息,并强行将该属性恢复为假。
[ 本帖最后由 TonyDeng 于 2011-12-12 13:44 编辑 ]
函数中,首先通过IF .RowSourceType <= 1判断,如果条件成立,则接受改变属性(赋值)的行为,允许将.MoverBars赋值为指定的数据,否则给出提示信息,并强行将该属性恢复为假。
[ 本帖最后由 TonyDeng 于 2011-12-12 13:44 编辑 ]
授人以渔,不授人以鱼。