我有浏览小部件和“FOCUS”的问题。 我知道“VALUE-CHANGED”事件,但它不能用于多个选择浏览我想要的方式。 在行的焦点我想显示关于该行的一些细节,但有文档我认为没有“焦点在行上”的事件。 ROW-ENTRY也不起作用。
所以使用我的键盘我会尝试专注于行(在某些细节下显示),然后我可以选择或不选择。
这是我的代码。
DEF VAR v_isSelected AS LOG INITIAL FALSE.
DEF BROWSE b2 QUERY q2
DISPLAY
{&FIELDS}
WITH 9 DOWN NO-BOX AT COLUMN 1 ROW 5 OVERLAY WIDTH 78 MULTIPLE.
ON "ROW-ENTRY" OF b2
DO:
v_isSelected = BROWSE b2:IS-ROW-SELECTED(BROWSE b2:FOCUSED-ROW).
BROWSE b2:SELECT-FOCUSED-ROW().
RUN det_b2(b2:HANDLE).
IF v_isSelected = FALSE THEN BROWSE b2:DESELECT-FOCUSED-ROW().
END.
关心并感谢您的帮助。
e:http://knowledgebase.progress.com/articles/Article/P130192 这是进步开发的答案。我希望这是一个触发器,但没有。