#!/usr/bin/env ruby
# $Id: menubar.rb,v 1.1 2003/11/03 18:22:20 radek Exp $
# $Source: /home/radek/cvs/ruby-book/example/gui/fxruby/menubar.rb,v $
require "fox"
include Fox

class MyApp < FXApp
end

class MyWin < FXMainWindow
    def initialize(app)
        super(app, "Menu", nil, nil, DECOR_ALL, 0, 0, 150, 36)

	# Vytvo��me menu
	menu = FXMenubar.new(self, LAYOUT_SIDE_TOP|LAYOUT_FILL_X)

	filemenu = FXMenuPane.new(self)

	FXMenuTitle.new(menu, "&File", nil, filemenu)
	FXMenuTitle.new(menu, "&Options")
	FXMenuTitle.new(menu, "&Help")

	FXMenuCommand.new(filemenu, "&Quit", nil, getApp(), FXApp::ID_QUIT)
    end

    def create
        super
        show(PLACEMENT_SCREEN)
    end
end

app = MyApp.new
app.init(ARGV)
win = MyWin.new(app)
app.create
app.run