Discussion :

[psychonaute]

Bonjour,
Le problème est le suivant ;
j'initialise une "vertical box" à l'intérieur d'une fonction :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
sub init_guicommun{
 
#etc..
 
$vb1 = Gtk::VBox->new($false,0);
$vb1->set_usize(130,350);
 
my $combo_modele = Gtk::Combo->new();
 
$combo_modele->set_popdown_strings( @tab_modele );
$frame_modele->add($combo_modele);
$vb1->add($frame_modele);
 
# etc..
}

Ensuite je cherche à récupérer le contenu d'un widget fils de $vb1 qui est retourné par la
fonction.

Code :

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

1
2
 
my $modele=$vb1->combo_modele->entry->get_text();

Erreur :

Code :

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

Can't locate object method "combo_modele" via package "Gtk::VBox" at guicommun.pm line 242

Je suis obligé de passer par le widget "père" puisque c'est l'objet que me retourne ma fonction, je ne connais pas , (et n'ai pas trouvé.. malgré de nombreuses recherches) la méthode générique qui me permet d'accèder à ce widget fils connaissant le père.
Toute aide est vivement appréciée

[gege2061]

Bonjour,

Il existe la méthode $container->get_children mais le plus simple est de garder une référence sur ton widget

[psychonaute]

Merci pour ta réponse ultrasonique

En effet je crois que je vais garder un tableau de hash avec les références de tous mes widgets.. après avoir vu comment Glade gérait son code c'est aussi de cette manière là qu'il fait appel à posteriori aux widgets

[gege2061]

En effet je crois que je vais garder un tableau de hash avec les références de tous mes widgets.. après avoir vu comment Glade gérait son code c'est aussi de cette manière là qu'il fait appel à fortiori aux widgets

C'est une solution (relativement simple à mettre en place en Perl), mais le top est de faire de la POO et dans ce cas il n'y a plus de soucis :

Code :

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

1
2
3
4
5
6
7
class MyWindow
{
  private MyMenu;
  private MyCombobox;
  private MyToolbar;
  /* ... */
}