Bonjour,
 
Pour débuter, j'essaie d'utiliser Win32::GUI pour afficher une fenêtre Windows avec un simple bouton OK sur ma station Windows XP pro. J'ai écrit un bout de code mais lorsque je l'exécute, j'ai le Dc Watson!
 
Auriez-vous des exemples de codes ou des adresses web à me fournir ?
 
Merci d'avance
 
ci-dessous mon code
 
use strict;
use Win32::GUI;
 
my $fenetre = new Win32::GUI::Window(
 -name   => "Window",
 -title  => "Exemple Window en Perl",
 -left   => 100,
 -top    => 100,
 -width  => 500,
 -height => 400,
 #-topmost => 1
 #-menu   => $Menu,
);
 
 
my $bouton=new Win32::GUI::Button(
 -name     => $fenetre,
 #-align   => center,
 #-valign  => bottom,
# -default => 0,
 -ok      => 1,
# -cancel  => 0,
);
$bouton->AddButton( -name => "Bouton1" );
 
$fenetre->Show();
               
Win32::GUI::Dialog();
 
sub Window_Activate()
{
}
sub Window_Deactivate()
{
 exit;
}