A handle to the default window for the current
ABL session. This window is the default parent for all frames, dialog
boxes, alert boxes, and messages. Set or examine the attributes
of the CURRENT-WINDOW handle to modify or get information on the
current default window.
Syntax
CURRENT-WINDOW [ :attribute ]
|
-
attribute
- An attribute of the CURRENT-WINDOW.
Attributes
The
CURRENT-WINDOW handle has all the attributes of a window widget.
Notes
- The
default value of the CURRENT-WINDOW handle is the static session
window referenced by the DEFAULT-WINDOW handle. You can change the
default window for the current session by assigning the handle of
a window to CURRENT WINDOW.
- The IN WINDOW phrase allows you to explicitly assign a window
as a parent for a frame, dialog box, alert box, or message.
- In a character interface, the ACTIVE-WINDOW, CURRENT-WINDOW,
and DEFAULT-WINDOW handles return the handle of the static window
for the current ABL session.
- The CURRENT-WINDOW attribute of a procedure allows you to specify
a default window for the procedure block. The CURRENT-WINDOW attribute
of a procedure overrides the CURRENT-WINDOW handle for the procedure
block.
- You can enable or disable the current window by changing CURRENT-WINDOW:SENSITIVE.
- You can set the menu bar for the current window by assigning
the handle of a menu bar to CURRENT-WINDOW:MENUBAR.
- You can make the current window visible or invisible by changing
the value of CURRENT-WINDOW:VISIBLE.
- Because CURRENT-WINDOW is the general default parent for ABL frames, you cannot set
CURRENT-WINDOW to the handle of a .NET form's shadow window. If allowed, this would make
the associated .NET form a default parent for ABL frames, and ABL cannot parent ABL frames
to .NET forms. A .NET form's shadow window handle is provided by the ProWinHandle property
of the Progress.Windows.Form class, which an OpenEdge .NET
class designed for instantiating .NET forms in an ABL session. Therefore, any attempt to
set CURRENT-WINDOW to a ProWinHandle property value raises a run-time error.
