Tk::Mlistbox

Salut

En fait , il faut passer une reference donc tu fais :



$ml->insert('end',[$Nom,$Rue,$Ville,$Cod]);
au lieu de :
$ml->insert('end',"$Nom $Rue $Ville $Cod");

Bon courage



***************************************************************


Je n'arrive pas a insérer des données dan ma boite de liste.

Voici mon script.

use Tk;

use Tk::MListbox;

$Win=MainWindow->new(-background => 'white');

$Win->geometry("640x480+1+1");



$ml = $Win->MListbox (-columns => [

[ -width => 30,-text =>'Nom', -sortable => 1],

[ -width => 40,-text =>'Rue', -sortable => 1],

[ -width => 22,-text =>'Ville', -sortable => 1],

[ -text =>'CodPost', -sortable => 1]],

-background => 'gray',-foreground => 'gray100', -height => 10,-width => 640,

)->place(-x => 0, -y => 200);

open(f_in, "<client.txt");

while(<f_in>) {

($Nom,$Rue,$Cod,$Ville)=split(/_/,$_);



$ml->insert('end',"$Nom $Rue $Ville $Cod");

}

Voici le message d'erreur: Can'use string ("Dupont") as an ARRAY ref while
"strict refs" u=in use c:/Perl/site/lib/Tk/MListbox.pm

ps: sur Listbox standard dans Tk cela fonctionne. Il y a t-il une méthode
particulière d'insertion de donnée dans les MListbox??

Merci Frantz



--
Ce message a été posté via la plateforme Web club-Internet.fr
This message has been posted by the Web platform club-Internet.fr

http://forums.club-internet.fr/

Frantz DORSEMAINE wrote:

Je n'arrive pas a insérer des données dan ma boite de liste.

...

$ml->insert('end',"$Nom $Rue $Ville $Cod");

...

Voici le message d'erreur: Can'use string ("Dupont") as an ARRAY ref
while "strict refs" u=in use c:/Perl/site/lib/Tk/MListbox.pm

ps: sur Listbox standard dans Tk cela fonctionne. Il y a t-il une
méthode particulière d'insertion de donnée dans les MListbox??

Merci Frantz

tu essaie d'inserer une chaine la ou il faut une reference a un tableau

essaye
$ml->insert('end',[$Nom,$Rue,$Ville,$Cod]);

Merci ça marche en cherchant dans un script de test sur internet j'ai
trouvé.
"dominix" <dominix"at"despammed.com> a écrit dans le message de news:
3fb89163$0$13297$626a54ce@news.free.fr...

Frantz DORSEMAINE wrote:

Je n'arrive pas a insérer des données dan ma boite de liste.

...

$ml->insert('end',"$Nom $Rue $Ville $Cod");

...

Voici le message d'erreur: Can'use string ("Dupont") as an ARRAY ref
while "strict refs" u=in use c:/Perl/site/lib/Tk/MListbox.pm

ps: sur Listbox standard dans Tk cela fonctionne. Il y a t-il une
méthode particulière d'insertion de donnée dans les MListbox??

Merci Frantz

tu essaie d'inserer une chaine la ou il faut une reference a un tableau

essaye
$ml->insert('end',[$Nom,$Rue,$Ville,$Cod]);