summaryrefslogtreecommitdiff
path: root/ext/gtk/test4.rb
blob: da0000c42079badb33232b6f161df47bc5a7b8dc (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
require 'gtk'

window = Gtk::Window::new(Gtk::WINDOW_TOPLEVEL)
window.set_title("notebook")
window.border_width(0)

box1 = Gtk::VBox::new(FALSE, 0)
window.add(box1)
box1.show

box2 = Gtk::VBox::new(FALSE, 10)
box2.border_width(10)
box1.pack_start(box2, TRUE, TRUE, 0)
box2.show

notebook = Gtk::Notebook::new()
notebook.set_tab_pos(Gtk::POS_TOP)
box2.pack_start(notebook, TRUE, TRUE, 0)
notebook.show

for i in 1..5
  frame = Gtk::Frame::new(format("Page %d", i))
  frame.border_width(10)
  frame.set_usize(200, 150)
  frame.show

  label = Gtk::Label::new(format("Box %d", i))
  frame.add label
  label.show

  label = Gtk::Label::new(format("Tab %d", i))
  notebook.append_page frame, label
end

separator = Gtk::HSeparator::new()
box1.pack_start(separator, FALSE, TRUE, 0)
separator.show

box2 = Gtk::HBox::new(FALSE, 10)
box2.border_width(10)
box1.pack_start(box2, FALSE, TRUE, 0)
box2.show

button = Gtk::Button::new("close")
button.signal_connect("clicked") do
  window.destroy
  exit
end
box2.pack_start(button, TRUE, TRUE, 0)
button.set_flags(Gtk::CAN_DEFAULT);
button.grab_default
button.show

button = Gtk::Button::new("next")
button.signal_connect("clicked") do
  notebook.next_page
end
box2.pack_start(button, TRUE, TRUE, 0)
button.show

button = Gtk::Button::new("prev")
button.signal_connect("clicked") do
  notebook.prev_page
end
box2.pack_start(button, TRUE, TRUE, 0)
button.show

button = Gtk::Button::new("rotate")
button.signal_connect("clicked") do
  notebook.set_tab_pos((notebook.tab_pos+1)%4)
end
box2.pack_start(button, TRUE, TRUE, 0)
button.show

window.show

Gtk::main()