Kbase 13553: Error 4088 The toolkit does not support move-to-top
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  5/10/1998 |
|
Error 4088 The toolkit does not support move-to-top
DESC: ERROR 4088 MOVE-TO-TOP NOT SUPPORTED
TAGS:
TTY Unix, gets error 4088 "The toolkit does not support move-to-top for the
selection list widget." This works fine under MS-Windows and Motif. See
attached code which will duplicate the bug.
Sample code file(s):
File /usr/rdl/bug/41011019.p:
dEFINE BUTTON BUTTON-1
LABEL "Button 1"
SIZE 10 BY 1.
define button but2 label "Hide it" size 10 by 1.
DEFINE VARIABLE FILL-IN-1 AS CHARACTER FORMAT "X(8)":U
label "Fill In 1"
VIEW-AS FILL-IN
SIZE 10 BY 1 NO-UNDO.
DEFINE VARIABLE FILL-IN-2 AS CHARACTER FORMAT "X(8)":U
LABEL "Fill In 2"
VIEW-AS FILL-IN
SIZE 10 BY 1 NO-UNDO.
DEFINE VARIABLE FILL-IN-3 AS CHARACTER FORMAT "X(8)":U
LABEL "Fill In 3"
VIEW-AS FILL-IN
SIZE 10 BY 1 NO-UNDO.
DEFINE VARIABLE select-1 AS CHARACTER
VIEW-AS SELECTION-LIST SINGLE
LIST-ITEMS "one ","two","three","four","five"
SIZE 21 BY 8.84 NO-UNDO.
DEFINE FRAME FRAME-A
select-1 AT ROW 6.2 COL 16 NO-LABEL
FILL-IN-1 AT ROW 7.24 COL 7 COLON-ALIGNED NO-LABEL
FILL-IN-2 AT ROW 9.32 COL 18 COLON-ALIGNED
FILL-IN-3 AT ROW 11.92 COL 28 COLON-ALIGNED
BUTTON-1 AT ROW 17.12 COL 21
but2 at row 17.2 col 40
WITH 1 DOWN NO-BOX OVERLAY SIDE-LABELS
AT COL 1 ROW 1
SIZE 80 BY 21.
define var stat as logical.
ASSIGN
select-1:HIDDEN IN FRAME FRAME-A = TRUE.
ON CHOOSE OF BUTTON-1 IN FRAME FRAME-A /* Button 1 */
DO:
ENABLE select-1
WITH FRAME FRAME-A.
stat = select-1:move-to-top().
message stat view-as alert-box message buttons ok.
END.
on choose of but2 in frame frame-a
do:
select-1:hidden = true.
end.
ENABLE FILL-IN-1 FILL-IN-2 FILL-IN-3 BUTTON-1 but2
WITH FRAME FRAME-A.
WAIT-FOR WINDOW-CLOSE OF current-window.
Progress Software Technical Support Note # 13553