Bonjour,
Je viens de faire un test chez moi sur un Strawberry Perl 5.24 64 bits, sur un Windows 10.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
| #!/usr/bin/perl
use strict;
use warnings;
use Tk;
use Tk::Photo;
use Tk::JPEG;
my $fenetre = new MainWindow(
-title => 'button image',
-background => 'white',
);
my $objet_image = $fenetre->Photo( -file => 'lama.jpg' );
$fenetre->Button (
-image => $objet_image,
-command => sub { exit; },
)->pack();
MainLoop; |
Commande de conversion :
Le .pl et le .exe fonctionne parfaitement. Le premier lancement du .exe est long car mon antivirus fait une vérification des fichiers dll, xs...
Peux-tu nous afficher Peux-tu aussi afficher ton code et le résultat de la commande
pp -o cible.exe source.pl -v
Partager