crystal-gobject/src/gtk/gtk.cr at 0f70130d71ec48b761d366df74fa8b784fbdbd25 · jhass/crystal-gobject · GitHub

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
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
require "signal"
require "../g_object"
require "../gdk"
require "../generated/lib_gtk"
require "../generated/gtk/text_direction"
require "../generated/gtk/selection_data"
require "../generated/gtk/drag_result"
require "../generated/gtk/direction_type"
require "../generated/gtk/tooltip"
require "../generated/gtk/widget_help_type"
require "../generated/gtk/state_type"
require "../generated/gtk/state_flags"
require "../generated/gtk/style"
require "../generated/gtk/movement_step"
require "../generated/gtk/menu_direction_type"
require "../generated/gtk/scroll_type"
require "../generated/gtk/menu"
require "../generated/gtk/cell_editable"
require "../generated/gtk/cell_renderer"
require "../generated/gtk/tree_path"
require "../generated/gtk/tree_iter"
require "../generated/gtk/tree_model"
require "../generated/gtk/css_section"
require "../generated/gtk/entry_icon_position"
require "../generated/gtk/file_chooser_confirmation"
require "../generated/gtk/flow_box_child"
require "../generated/gtk/pan_direction"
require "../generated/gtk/list_box_row"
require "../generated/gtk/notebook_tab"
require "../generated/gtk/position_type"
require "../generated/gtk/print_operation_result"
require "../generated/gtk/print_context"
require "../generated/gtk/page_setup"
require "../generated/gtk/print_operation_preview"
require "../generated/gtk/print_settings"
require "../generated/gtk/text_iter"
require "../generated/gtk/text_child_anchor"
require "../generated/gtk/text_tag"
require "../generated/gtk/text_mark"
require "../generated/gtk/toolbar_style"
require "../generated/gtk/tree_view_column"
require "../generated/gtk"

module Gtk
  class Window
    def self.new : self
      new LibGtk::WindowType::TOPLEVEL
    end
  end

  class Builder
    def connect_signals
      connect_signals nil
    end

    def [](id)
      object(id).not_nil!
    end

    def []?(id)
      object(id)
    end
  end

  class CssProvider
    def load_from_data(string : String)
      load_from_data(string, string.bytesize)
    end
  end

  class Application
    def run
      run ARGC_UNSAFE, ARGV_UNSAFE
    end
  end
end

class Gtk::Container
  def children
    a = [] of Gtk::Widget

    foreach(-> (c : LibGtk::Widget*, d : Void*) {
      d.as(Array(Gtk::Widget)*).value << Gtk::Widget.cast(c)
      nil
    }, pointerof(a).as(Void*))

    a
  end

  def foreach(&cb : Gtk::Widget -> _)
    foreach(-> (c : LibGtk::Widget*, d : Void*) {
      Proc(Gtk::Widget, Nil).new(d, Pointer(Void).null).call Gtk::Widget.cast(c)
      nil
    }, cb.pointer)
  end
end