vfp新手的一些有关问题

vfp新手的一些问题

[解决办法]
问题1.

thisform.setall("Enabled", .F., "TextBox")

用法没错，检查一下表单中，还有什么地方设置了 ENABLED 属性

问题2.
表单的 INIT 事件代码

*---设置失效控件的背景色
THISFORM.SetAll([DISABLEDBACKCOLOR],RGB(255,255,255),[TEXTBOX])
*---设置失效控件的前景色
THISFORM.SetAll([DISABLEDFORECOLOR],RGB(255,0,0),[TEXTBOX])

问题3.
在该文本框的 LOSTFOCUS 事件中，写入以下代码试试

SELECT 表A  &&你自己的数据表的别名
LOCAL FOR ALLTRIM(CODE)==ALLTRIM(THIS.VALUE)
IF FOUND()
   THISFORM.LABEL1.CAPTION=ALLTRIM(DESC)
ELSE
   RETURN MESSAGEBOX([没找到与]+ALLTRIM(THIS.VALUE)+[匹配的记录])
ENDIF
THISFORM.REFRESH

[解决办法]
属性框的默认值，对表单INIT事件中设置的文本框的ENABLED属性没有影响，认真检查一下，表单中肯定有文本框的ENABLED属性设置，否则不会出现你所说的问题。
[解决办法]
肯定是哪里设置了enabled属性了.自己先找找

查看更多 下一篇