Advertise / Subwidget: Perl / Tk (Graphische Oberflächen)

[thread]5021[/thread]

Advertise / Subwidget: Perl / Tk

Crian

2005-06-30 17:32

User since
2003-08-04
5870 Artikel
ModeratorIn

Ich hab folgendes Problem: Ich möchte Widgets "benamsen", um sie später über diesen Namen ansprechen zu können. Das spart globale Variablen oder Hasheinträge...).

Dazu mache ich an einer Stelle, wo ich ein Widget angelegt habe

Code: (dl )

$mw->Advertise('MEINWIDGET' => $widget);

und will dann an anderer Stelle mit

Code: (dl )

$mw->Subwidget('MEINWIDGET')->configure(...);

darauf zugreifen.

Genaueres siehe perldoc Tk::mega ...

Leider meint der Computer zu der ersten Zeile oben:

Can't locate Tk/Advertise.pm in @INC ...

obwohl perldoc Tk::mega funktioniert.

Was mach ich falsch?\n\n

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

Crian

2005-06-30 17:34

User since
2003-08-04
5870 Artikel
ModeratorIn

Hat sich erledigt ... kaum macht man es richtig, schon funktioniert es ;)

(Ich hatte statt $mw->Advertise('MEINWIDGET' => $widget); dummer Weise $widget->Advertise(name => 'MEINWIDGET'); probiert, weil ich nicht richtig gelesen hatte.)\n\n

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

View all threads created 2005-06-30 17:32.