Kbase P114480: 4GL/ABL: How to apply focus to a FILL-IN widget on the ENTRY of a BROWSE widget?
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
04/05/2010 |
|
Status: Verified
GOAL:
4GL/ABL: How to apply focus to a FILL-IN widget on the ENTRY of a BROWSE widget?
GOAL:
How to conditionally override the default behavior of the BROWSE widget ENTRY trigger and APPLY ENTRY to a FILL-IN widget?
GOAL:
How to APPLY entry to a specific FILL-IN widget on the ENTRY event of a BROWSE widget unless the user mouse clicks over the BROWSE widget?
FACT(s) (Environment):
Windows
Progress 9.x
OpenEdge 10.x
FIX:
Create an ENTRY trigger for the BROWSE widget and conditionally apply ENTRY to the specified FILL-IN widget. For example, the following BROWSE widget ENTRY event trigger moves the focus to FILL-IN-1 unless the user mouse clicks over the browse:
ON ENTRY OF BROWSE-1 IN FRAME DEFAULT-FRAME /* Browse 1 */
DO:
IF LAST-EVENT:EVENT-TYPE = "MOUSE" AND LAST-EVENT:WIDGET-ENTER:NAME = "BROWSE-1" THEN
MESSAGE "Do desired processing if user mouse clicks over browse"
VIEW-AS ALERT-BOX INFO BUTTONS OK.
ELSE DO:
APPLY "ENTRY" TO FILL-IN-1 IN FRAME DEFAULT-FRAME.
RETURN NO-APPLY.
END.
END.