Allow passing options to girtod when ran from <buildem>.
[girtod.git] / example_gtk1.d
blob11c69e18a2f11f141cf22ff935d4c57b325ca918
1 import gobj = gtk2.gobject2;
2 import gtk = gtk2.gtk2;
4 extern (C) int delete_cb(gtk.Widget* this_, gtk.Event* event, void* user_data) {
5 import std.stdio;
6 writeln("delete_cb(", this_, ", ", event, ", ", user_data, ")");
8 gtk.exit(0);
9 return 0;
12 int main(string argv[]) {
13 gtk.init(null,null);
15 gtk.Window* window = gtk.Window.new_(gtk.WindowType.TOPLEVEL);
16 window.set_title(cast(char*)"Hello World!");
17 window.set_default_size(640, 480);
19 gobj.signal_connect_object(window, cast(char*)"delete-event",
20 cast(gobj.Callback)&delete_cb, null/*obj*/, cast(gobj.ConnectFlags)0);
22 window.show_all();
24 gtk.main_();
25 return 0;