# File examples/fox/bitmapper.rb, line 20 def initialize(app) # Invoke base class initialize first super(app, "Jabber Image Sender (#{ARGV[0]}): - untitled", nil, nil, DECOR_ALL, 0, 0, 850, 600, 0, 0) # Make some icons uplevelicon = getIcon("tbuplevel.png") # Status bar statusbar = FXStatusbar.new(self, LAYOUT_SIDE_BOTTOM|LAYOUT_FILL_X|STATUSBAR_WITH_DRAGCORNER) # Splitter splitter = FXSplitter.new(self, (LAYOUT_SIDE_TOP|LAYOUT_FILL_X| LAYOUT_FILL_Y| SPLITTER_TRACKING|SPLITTER_VERTICAL|SPLITTER_REVERSED)) # Sunken border for image widget imagebox = FXHorizontalFrame.new(splitter, FRAME_SUNKEN|FRAME_THICK|LAYOUT_FILL_X|LAYOUT_FILL_Y, 0, 0, 0, 0, 0, 0, 0, 0) # Make image widget @imageview = FXImageView.new(imagebox, nil, nil, 0, LAYOUT_FILL_X|LAYOUT_FILL_Y) # Sunken border for file list @filebox = FXHorizontalFrame.new(splitter, LAYOUT_FILL_X|LAYOUT_FILL_Y, 0, 0, 0, 0, 0, 0, 0, 0) # Make file list fileframe = FXHorizontalFrame.new(@filebox, FRAME_SUNKEN|FRAME_THICK|LAYOUT_FILL_X|LAYOUT_FILL_Y, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0) @filelist = FXFileList.new(fileframe, nil, 0, LAYOUT_FILL_X|LAYOUT_FILL_Y|ICONLIST_MINI_ICONS|ICONLIST_AUTOSIZE) @filelist.connect(SEL_DOUBLECLICKED, method(:onCmdFileList)) FXButton.new(@filebox, "\tUp one level\tGo up to higher directory.", uplevelicon, @filelist, FXFileList::ID_DIRECTORY_UP, BUTTON_TOOLBAR|FRAME_RAISED|LAYOUT_FILL_Y) # Initialize file name and pattern for file dialog @filename = "untitled" @preferredFileFilter = 0 end