Avatar billede jungle_rat Nybegynder
12. maj 2002 - 17:24 Der er 1 kommentar og
1 løsning

Tk:Button, -command => ..........

Jeg har en sub der tager input og denne sub er knyttet til en Tk::Button. Problemet er bare at jeg ikke kan få perl til at sende input til sub'en ved tryk på knappen.

Hvad er syntaxen for sådan en Tk:Button, ....,-command => \&sub($input,$input2,...).... ?

Har prøvet flere kombinationer men uden held.
Avatar billede jespernaur Nybegynder
12. maj 2002 - 19:25 #1
Du har brug for såkaldte 'closure's. Eksemplet herunder skaber 5 Button's
med hver sit navn og hver sin parameter:

use Tk;

$mw = MainWindow->new;

foreach $b (1 .. 5) {
    $mw->Button(
        -text    => $b,
        -command => [sub {print "Button $_[0]\n"}, $b],
    )->pack;
}

MainLoop;

Mvh
Jesper Naur
Avatar billede jungle_rat Nybegynder
13. maj 2002 - 12:01 #2
takker :)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester