Kbase 18147: How to Size Default Window when Directly Running SmartBrowse
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
28/07/1998 |
|
How to Size Default Window when Directly Running SmartBrowse
If you have built a SmartBrowse that is wider than the standard width
used by the default window that is created when you directly run the
SmartBrowse (i.e. it is not embedded in another SmartObject) you can
place the following code in the local-initialize procedure for the
SmartBrowse to cause the default window to be resized such that the
SmartBrowse fits completely within the default window.
/* Code placed here will execute PRIOR to standard behavior */
&IF DEFINED(UIB_is_Running) NE 0 &THEN
DO WITH FRAME {&FRAME-NAME}:
ASSIGN DEFAULT-WINDOW:WIDTH-CHARS = {&BROWSE-NAME}:WIDTH-CHARS
DEFAULT-WINDOW:HEIGHT-CHARS = {&BROWSE-NAME}:HEIGHT-CHARS.
END.
&ENDIF