Bonjour à tous, je ne sais pas si il y a des linuxiens sur ce forum, ça m'arrangerait bien ^^
J'ai un problème, je débute en Perl, et j'essaye de faire une GUI pour le script d'un ami... J'ai créé le tout avec Glade et la fenêtre se ferme bien, et ma boite a propos aussi ^^ (je dis ça parce que j'ai pataugé avant de comprendre comment relier ces satanées fonctions de rappels) ! Le problème, c'est que je n'arrive pas à incrémenter ma liste à colones, voila mon code :
Code :
#!/usr/bin/perl
use strict;
use warnings;
use Gnome2;
use Gtk2::GladeXML;
my $clist1;
my $fmabase = "mabase.txt";
my @recup;
my $nbreg = 0;
Gnome2::Program->init ("Gestion de base de données de clients", "1.0" );
my $gladexml = Gtk2::GladeXML->new('gui.glade');
$gladexml->signal_autoconnect_from_package();
open(LB,">>$fmabase" );
while ( my $lecture = <LB> )
{
chomp($lecture);
@recup = split(/\t/,$lecture);
$clist1->insert( $nbreg, @recup );
$nbreg++;
}
close( LB );
Gtk2->main();
## Les fonctions de rappel
sub on_window1_delete_event{
Gtk2->main_quit ;
}
sub on_apropos1_activate{
my $dialog = Gtk2::MessageDialog->new ($window1,
[qw/modal destroy-with-parent/],
'info' ,
'ok' ,
"A propos" ) ;
$dialog->run ;
$dialog->destroy() ;
}
Comme je l'ai dit, ma fenetre s'affiche, tout bien ,avec tout mes controles mais impossible d'ajouter quoi que ce soit à ma liste à collones
Marsh Posté le 15-06-2006 à 00:55:14
Bonjour à tous,
je ne sais pas si il y a des linuxiens sur ce forum, ça m'arrangerait bien ^^
J'ai un problème, je débute en Perl, et j'essaye de faire une GUI pour le script d'un ami...
J'ai créé le tout avec Glade et la fenêtre se ferme bien, et ma boite a propos aussi ^^ (je dis ça parce que j'ai pataugé avant de comprendre comment relier ces satanées fonctions de rappels) !
Le problème, c'est que je n'arrive pas à incrémenter ma liste à colones, voila mon code :
Comme je l'ai dit, ma fenetre s'affiche, tout bien ,avec tout mes controles mais impossible d'ajouter quoi que ce soit à ma liste à collones
merci de votre aide !