14 lines
368 B
Text
14 lines
368 B
Text
use Gtk2;
|
|
|
|
bundle Default {
|
|
class GtkHello {
|
|
function : Main(args : String[]) ~ Nil {
|
|
window := GtkWindow->New();
|
|
delete_callback := Events->DeleteEvent(GtkWidget) ~ Nil;
|
|
window->SignalConnect(Signal->Destroy, window->As(GtkWidget), delete_callback);
|
|
window->SetTitle("Title");
|
|
window->Show();
|
|
Appliction->Main();
|
|
}
|
|
}
|
|
}
|