The Window class / Examples |
MAIN DEFINE w ui.Window OPEN WINDOW w1 WITH FORM "customer" ATTRIBUTE(TEXT="Unknown") LET w = ui.Window.forName("w1") IF w IS NULL THEN EXIT PROGRAM END IF CALL w.setText("Customer") MENU "Test" COMMAND "exit" EXIT MENU END MENU CLOSE WINDOW w1 END MAIN