Simple windowed application: Difference between revisions

→‎{{header|Perl 6}}: Update to current standards
(added Factor)
(→‎{{header|Perl 6}}: Update to current standards)
Line 1,888:
{{libheader|GTK}}
<lang perl6>use GTK::Simple;
use GTK::Simple::App;
 
my GTK::Simple::App $app .= new(title => 'Simple Windowed Application');
 
$app.size_requestsize-request(350, 100);
 
$app.set_contentset-content(
GTK::Simple::VBox.new(
my $label = GTK::Simple::Label.new( text => 'There have been no clicks yet'),
Line 1,900 ⟶ 1,901:
);
 
$app.border_widthborder-width = 40;
 
$button.clicked.tap: {
10,333

edits