Kbase P114969: How to create a dynamic RECTANGLE widget?
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
06/04/2006 |
|
Status: Unverified
GOAL:
How to create a dynamic RECTANGLE widget?
GOAL:
How to toggle the visibility of a dynamic RECTANGLE widget?
FIX:
The following 4GL 4GL code snippet creates a dynamic RECTANGLE widget:
DEFINE VARIABLE hRectangle AS HANDLE NO-UNDO.
CREATE RECTANGLE hRectangle
ASSIGN
FRAME = FRAME DEFAULT-FRAME:HANDLE
X = 85
Y = 50
HEIGHT-PIXELS = 125
WIDTH-PIXELS = 210
EDGE-PIXELS = 5
FILLED = FALSE
VISIBLE = TRUE.
The following 4GL code snippet toggles the visibility of the above dynamic RECTANGLE widget. If it is VISIBLE it hides it and if it is HIDDEN it shows it:
IF hRectangle:VISIBLE THEN
hRectangle:HIDDEN = TRUE.
ELSE
hRectangle:VISIBLE = TRUE.