首页 > 解决方案 > 如何访问控制?

问题描述

我刚刚创建了一个窗口,其中包含一个填写字段 ( TestField) 和一个复选框 ( chk_TestField):

DEFINE VARIABLE TestField AS INTEGER VIEW-AS FILL-IN.
DEFINE VARIABLE chk_TestField AS LOGICAL VIEW_AS TOGGLE-BOX.

根据复选框的检查来更改填充字段的值非常简单,例如:

ON VALUE-CHANGED OF chk_TestField IN FRAME DEFAULT-FRAME
DO:
  TestField = 5.
END.

但是,我有兴趣更改 Fill-in 字段本身的属性,而不是它所代表的整数(我想将 fill-in 字段设为只读),我该怎么做?

我试过了:

ON VALUE-CHANGED OF chk_TestField IN FRAME DEFAULT-FRAME
DO:
  TestField.Read-Only = NOT(chk_TestField).
END.

这显然是行不通的。

标签: openedgeprogress-4gl

解决方案


ASSIGN TestField:READ-ONLY IN FRAME {&FRAME-NAME} = TRUE.

或者

ASSIGN Table.TestField:READ-ONLY IN FRAME {&FRAME-NAME} = TRUE.

推荐阅读