VFP修改控件属性值时，会不会触发什么方法？ - 编程论坛

#2

吹水佬2022-04-12 20:43

只有本站会员才能查看附件，请登录

#3

weiyisc2022-04-13 01:01

回复 2楼吹水佬

只有本站会员才能查看附件，请登录

为什么有个别属性，在这个地方修改不了？？？

#4

吹水佬2022-04-13 07:13

this.enabled = vNewVal

#5

吹水佬2022-04-13 07:14

程序代码：

of = CREATEOBJECT("form1")
of.show(1)
CLEAR ALL
RETURN

DEFINE CLASS form1 as Form
    ADD OBJECT txt1 as text1 WITH left=10,top=10
    ADD OBJECT cmd1 as commandbutton WITH left=120,top=10
    PROCEDURE cmd1.click
        thisform.txt1.enabled = !thisform.txt1.enabled
    ENDPROC
ENDDEFINE

DEFINE CLASS text1 as textbox
    Visible = 1
    PROCEDURE enabled_ACCESS
        RETURN this.enabled
    ENDPROC
    PROCEDURE enabled_ASSIGN(tAssign)
        this.enabled = tAssign
    ENDPROC
ENDDEFINE

#6

weiyisc2022-04-13 09:51

回复 5楼吹水佬

谢谢版主
本来想实现禁用文本框，将鼠标样式修改其它样式的。结果测试enabled设置未.f.时，在修改MousePointer属性无效。