Help language development. Donate to The Perl Foundation

Gnome::Gtk3 cpan:MARTIMM last updated on 2020-09-23

xt/b-in-w.pl6
use v6;

use Gnome::Gtk3::Main;
use Gnome::Gtk3::Button;
use Gnome::Gtk3::Window;

my Gnome::Gtk3::Window $w .= new(:title('My Button In My Window'));
$w.set-position(GTK_WIN_POS_MOUSE);

my Gnome::Gtk3::Button $b .= new(:label('The Button'));
$w.gtk-container-add($b);
$w.show-all;

$w.set-interactive-debugging(1);

my Gnome::Gtk3::Main $m .= new;
$m.gtk-main;