Class: TkMultimediaWrapper

Inherits:
Object
  • Object
show all
Includes:
Colours, VideoEncodingConstants
Defined in:
lib/multimedia_paradise/gui/tk/tk_multimedia_wrapper.rb

Instance Method Summary collapse

Constructor Details

#initialize ⇒ TkMultimediaWrapper

#

initialize

#


17
18
19
20
21
22
23
24
25
26
27
 
# File 'lib/multimedia_paradise/gui/tk/tk_multimedia_wrapper.rb', line 17

def initialize
  @main_window = TkRoot.new() { 
    title 'Multimedia Wrapper'
  }
  @main_window.geometry GUI_WIDTH.to_s+'x'+GUI_HEIGHT.to_s
  create_frames
  create_buttons
  create_keyevents
  Tk.root.resizable(false, false)
  Tk.mainloop()
end

Instance Method Details

#create_buttons ⇒ Object

#

create_buttons

#


48
49
50
51
52
53
54
 
# File 'lib/multimedia_paradise/gui/tk/tk_multimedia_wrapper.rb', line 48

def create_buttons
  @button_quit = TkButton.new(@frame) {
    text 'Quit'
    command proc { cme 'Exiting now.'; exit }
    pack('side'=>'left', 'padx'=>10, 'pady'=>10)
  }
end

#create_frames ⇒ Object

#

create_frames

#


41
42
43
 
# File 'lib/multimedia_paradise/gui/tk/tk_multimedia_wrapper.rb', line 41

def create_frames
  @frame = TkFrame.new
end

#create_keyevents ⇒ Object

#

create_keyevents

#


32
33
34
35
36
 
# File 'lib/multimedia_paradise/gui/tk/tk_multimedia_wrapper.rb', line 32

def create_keyevents
  @main_window.bind('Any-Key-h') {
    p "...world! (@main_window)"
  }
end