Using a Functional Language lightens code

component functions: button, label, textfield, textarea, choice, menus, ...
layout functions: border, row, col, grid, table, splitpane, scrollpane
fonts and colors ...

(load "jlib/Swing.scm")

(define w 
 (window "sorry" 
  (menubar 
    (menu "File"
      (menuitem "quit" red 
          (action (lambda(e) (.hide w))))))
  (border 
    (north 
      (label "Join Request Refused" (HelveticaBold 24)))
    (center 
     (scrollpane
      (textarea 5 30 (TimesRoman 18) yellow
        "Your request to join the group\nhas been denied")))
   (south 
      (button "OK" 
         (action (lambda(e) (.hide w))))))))

(.pack w) (.show w)

continue

set preferences

LL2, Saturday 9 November 2002, Tim Hickey/Ken Anderson