求教TonyDeng :通过方法来调用修改已保护的属性值,不懂。盼等!
TonyDeng :预祝国庆愉快!又要来麻烦你了。下面是书上有关<保护及隐藏类成员>的例子,通过方法来调用修改已保护的属性值。窗口标题变化的代码。可以运行。
里面有的代码起什么作用?整个代码的运行机制是什么(运行过程是怎样进行的)?请您指教!(请见标识)
myform1=createobject("myform")
myform1.show
? myform1.getcaption() &&此句是不是调用自定义方法,并在表单中显示有关内容?
m="我的窗口"
myform1.changecaption(m) &&此句是不是自定义方法传递参数M?
?myform1.getcaption() &&此句与上面红的一句(?myform1.getcaption())作用是否一样? ,既然有了上面的一句,为什么此处还要这一句?
release myform &&&此处为何用myform 而不用myform1?
define class myform as form
protected caption
top=40
left=100
caption='被保护的窗口标题'
&&&&&&以下一段代码是如何运行的?
procedure getcaption
return this.caption &&返回到何处?
endproc
proc changecaption(c)
this.caption=c &&此句的作用?
endproc
enddefine