Discussion :

[alainbb]

Bonjour,

J'ai réussi à lancer le tk de perl5 avec perl6, mais je bloque sur les paramètres à passer.
J'ai bien réussi pour le "title" de la fenêtre, mais je bloque pour le texte du Label, $top.Label(-text => 'Salut') ne fonctionnant pas, j'ai essayé ce qui suit.

Une idée ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
#!/opt/rakudo-star/install/bin/perl6
use Inline::Perl5;
use Tk:from<Perl5>;
my $top=MainWindow.new();
$top.title('Première fenêtre Tk');
my $l=$top.Label;
#$l.text('Salut');
$l.pack;
MainLoop;

Merci.

[alainbb]

Une solution

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
my $l=$top.Label; 
$l.configure('-text','Salut'); 
$l.pack;