#lang scheme/gui

;;==========================================================================
;;===                Code generated with MrEd Designer 3.0               ===
;;===                 http://mred-designer.origo.ethz.ch                 ===
;;==========================================================================

(provide project-1142
         frame-11764
         menu-bar-11800
         menu-11807
         menu-item-1164)
(define project-1142 #f)
(define frame-11764 #f)
(define menu-bar-11800 #f)
(define menu-11807 #f)
(define menu-item-1164 #f)
(define (project-1142-init
         #:menu-bar-11800-demand-callback
         (menu-bar-11800-demand-callback
          (lambda (m) (void)))
         #:menu-11807-demand-callback
         (menu-11807-demand-callback
          (lambda (m) (void)))
         #:menu-item-1164-callback
         (menu-item-1164-callback
          (lambda (item event) (void)))
         #:menu-item-1164-demand-callback
         (menu-item-1164-demand-callback
          (lambda (item) (void))))
  (set! project-1142
    (new
     frame%
     (parent #f)
     (label "")
     (style (list 'no-resize-border 'no-caption))))
  (set! frame-11764
    (new
     frame%
     (parent project-1142)
     (label "Frame")
     (width #f)
     (height #f)
     (x 369)
     (y 205)
     (style '())
     (enabled #t)
     (border 0)
     (spacing 0)
     (alignment (list 'center 'top))
     (min-width 70)
     (min-height 30)
     (stretchable-width #t)
     (stretchable-height #t)))
  (set! menu-bar-11800
    (new
     menu-bar%
     (parent frame-11764)
     (demand-callback menu-bar-11800-demand-callback)))
  (set! menu-11807
    (new
     menu%
     (parent menu-bar-11800)
     (label "&File")
     (help-string "File menu")
     (demand-callback menu-11807-demand-callback)))
  (set! menu-item-1164
    (new
     menu-item%
     (parent menu-11807)
     (label "&Item1")
     (callback menu-item-1164-callback)
     (shortcut #f)
     (help-string "Item 1")
     (demand-callback menu-item-1164-demand-callback)
     (shortcut-prefix '(ctl))))
  (send project-1142 show #t)
  (send frame-11764 show #t))