Ajout d'element dans un Gtk2::Ex::Simple::Tree
Bonsoir Amis programmeurs,
Je developpe une petite interface en perl GTK2. Jusqu'à là pas trop de probleme.
Par contre sur une de mes page j'ai créé une liste que l'on peut developper sous forme d'arbre avec le widget Gtk2::Ex::Simple::Tree. Cela ressemble en gros à ca sur le principe:
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50
|
$stree = Gtk2::Ex::Simple::Tree->new (
'Categorie' => 'text',
'Valeur' => 'text',
);
@{$stree->{data}} = (
{
value => [ 'one', undef, ],
children =>
[
{
value => [ 'one-1', 'Element 1', ],
},
]
},
{
value => [ 'two', undef, ],
children =>
[
{
value => [ 'two-2', 'Element 1', ],
},
]
},
); |